Problème code vba listbox

Version imprimable

Bonjour, j'ai un petit problème au niveau de mon code pour remplir une listbox avec des cellules, message d'erreur "Impossible de définir la propriété column. index de table de propriétés non valide."

Voici mon code:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
                            Sheets("Emplacement").Cells(14, 6) = TextBox1
                            Sheets("Emplacement").Cells(14, 7) = ComboBox1
                            Sheets("Emplacement").Cells(14, 8) = ComboBox2
                            Sheets("Emplacement").Cells(14, 9) = ComboBox3
 
                            With Sheets("Emplacement")
 
                UserForm_Ajouter.ListBox1.ColumnCount = 4
                UserForm_Ajouter.ListBox1.ColumnWidths = "80;80;80;80"
                UserForm_Ajouter.ListBox1.AddItem
                UserForm_Ajouter.ListBox1.Column(0, 1) = .Cells(11, 6)        '(bug a cet endroit la)
                UserForm_Ajouter.ListBox1.Column(1, 1) = .Cells(11, 7)
                UserForm_Ajouter.ListBox1.Column(2, 1) = .Cells(11, 8)
                UserForm_Ajouter.ListBox1.Column(3, 1) = .Cells(11, 9)
                UserForm_Ajouter.ListBox1.Column(0, 2) = .Cells(14, 6)
                UserForm_Ajouter.ListBox1.Column(1, 2) = .Cells(14, 7)
                UserForm_Ajouter.ListBox1.Column(2, 2) = .Cells(14, 8)
                UserForm_Ajouter.ListBox1.Column(3, 2) = .Cells(14, 9)
 
                        End With

Voila, je ne comprend pas pourquoi, si quelqu'un a l'amabilité de de m'aider, merci ! :D

15/03/2018, 11h01
joe.levrai

Bonjour,

.List(), pas .Column()

http://silkyroad.developpez.com/VBA/...serForm/#LII-G
15/03/2018, 11h02
unparia

Bonjour
Que viennent faire ces "column" là-dedans ?

remplacer (exemple)

Code:

ListBox1.List(0, 1) = ......

ou 0 est un rang de ligne et 1 un rang de colonne, par définition.
15/03/2018, 11h06
OurliacThomas

j'ai donc remplacé tout les column par par des list mais maintenant j'ai un bug sur la ligne juste en dessous :)

enfaite j ai l'impression que sa bug au moment de changer de ligne
15/03/2018, 11h08
joe.levrai

Quoi de plus normal ?

Est-ce que tu comprends la mécanique de ton code ?

1) je crée une ligne dans Listbox
2) j'en remplis deux colonnes
3) je remplis la ligne suivante

observe bien ce qu'il manque entre l'étape 2 et l'étape 3
15/03/2018, 11h09
OurliacThomas

effectivement j'avais inversé colonne et ligne xd
15/03/2018, 11h10
joe.levrai

Au temps pour moi ... j'ai anticipé l'erreur suivante ...
15/03/2018, 11h13
OurliacThomas

C'est bon merci j'avais tout simplement oublier de rajouter une ligne ! Merci:D