re-Bonjour à tous,

J'ai actuellement une base de données stagiaires avec des listes déroulantes que je remplis avec ce code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub UserForm_Initialize()
 
Dim i
 
    For i = 2 To 7000
 
        ComboBox1.AddItem Sheets("Feuil1").Cells(i, 1)
 
    Next
 
End Sub
Mais ce code ne me convient pas car lorsque la base augmente je dois modifier la valeur 2 to 7000 à 7500, etc....
J'aimerais avoir quelque chose qui compte automatiquement le nombre de valeur dans la table, si possible?

Bonne journée