Blaster
XLDnaute Nouveau
Bonjour à tous,
Je ne comprends pas pourquoi le code ci-dessous ne fonctionne pas avec mon Listbox.
Le système me retourne une erreur d'exécution 381 : Impossible de définir la propriété List. Index de table de propriétés non valide
Je suis preneur de toute idée.
Merci par avance,
Je ne comprends pas pourquoi le code ci-dessous ne fonctionne pas avec mon Listbox.
Le système me retourne une erreur d'exécution 381 : Impossible de définir la propriété List. Index de table de propriétés non valide
VB:
Private Sub UserForm_Initialize()
Dim i As Integer
Me.ListBox1.ColumnCount = 5
For i = 2 To 10
Me.ListBox1.AddItem
Me.ListBox1.List(i, 0) = Sheets("Feuil1").Cells(i, 1)
Me.ListBox1.List(i, 1) = Sheets("Feuil1").Cells(i, 2)
Me.ListBox1.List(i, 2) = Sheets("Feuil1").Cells(i, 3)
Me.ListBox1.List(i, 3) = Sheets("Feuil1").Cells(i, 4)
Me.ListBox1.List(i, 4) = Sheets("Feuil1").Cells(i, 5)
Next i
End SubJe suis preneur de toute idée.
Merci par avance,
Dernière modification par un modérateur: