Bonjour,
Un tout petit TUTO pour ce que cela aiderait.
Voila une méthode que j'emploi très souvent pour alimenter une zone de liste déroulante ou non grâce à la boucle FOR.
'Alimentation d'une liste à l'initialisation de l'UserForm, dont la source se situe dans la feuille nommée DB
'On réalise l'alimentation via la boucle FOR pour laquelle on cherche la dernière ligne non vide de la liste (i)
'Dans la ligne 1 se trouve le titre de la colonne donc à ne pas intégrer à la liste
Private Sub UserForm_Initialize()
Dim i as integer , x as integer
i = ThisWorkbook.Sheets("DB").Range("a65536").End(xlUp).Row
For x = 2 To i
ListBox1.AddItem ThisWorkbook.Sheets("DB").Range("a" & x).Value
Next x
End Sub