Microsoft 365 Erreur code : Control Listbox

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

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 Sub


Je suis preneur de toute idée.

Merci par avance,
 
Dernière modification par un modérateur:

Statistiques des forums

Discussions
299 850
Messages
1 979 570
Membres
206 779
dernier inscrit
Bahlou