sunny

Bonjour,

Voici pour la boucle : Remplacer ComboBox1 par le nom de ta liste déroulante

Do While Not fichier = ''
ComboBox1.AddItem fichier
'inser_macro.list_macro.List(inser_macro.list_macr o.ListCount - 1, 1) = fichier
fichier = Dir
Loop