Bonjour le forum,
J'ai toujours un gros problème avec les listbox.
J'aimerais ajouter x lignes sur y colonnes.
Mon soucis : quand je dépasse les 9 colonnes, ca bug, pourtant j'ai défini 12 lignes.
voici le code :
Par pitier help, je vais être bon à être interné
J'ai toujours un gros problème avec les listbox.
J'aimerais ajouter x lignes sur y colonnes.
Mon soucis : quand je dépasse les 9 colonnes, ca bug, pourtant j'ai défini 12 lignes.
voici le code :
Code:
LST3.Clear
LST3.ColumnCount = 12
LST3.ColumnWidths = "20; 20;50;50;50;50;50;50;50;50;50;50"
'Dim A As String
X = 0
For X = 0 To 11
LST3.AddItem
LST3.Column(X, 0) = Sheets("MAT").Cells(1, X + 1).Value
'Si tu veux ajouter d'autres données...
LST3.Column(X, 0) = Sheets("MAT").Cells(1, X + 1).Value
LST3.Column(X, 0) = Sheets("MAT").Cells(1, X + 1).Value
LST3.Column(X, 0) = Sheets("MAT").Cells(1, X + 1).Value
Next X