bonsoir Elhich , bonsoir Razy
je suis peut etre hors sujet mais s'il s'agit d'une ListBox placée dans la feuille ,et que tu l'alimentes depuis une macro exterieure à l'objet , il faut préciser le nom de cette feuille.
par exemple :
Dim i As Byte
For i = 1 To 10
Sheets("Feuil1").ListBox1.AddItem i
Next i
ou en utilisant ton premier exemple :
Dim i As Byte
While i <> 10
i = i + 1
Sheets("Feuil1").ListBox1.AddItem (i)
Wend
s'il s'agit d'une ListBox placée dans un UserForm ,et que tu l'alimentes depuis une macro exterieure à l'objet , il faut préciser le nom du UseForm
par exemple :
Dim i As Byte
For i = 1 To 10
UserForm1.ListBox1.AddItem i
Next i
j'espere que cela pourra t'aider .
si cela ne fonctionne toujours pas , peux tu placer un exemple zippé sur le forum pour mieux visualiser ton soucis
bonne soiree
michel