listebox multiple colonne

bonjour
voila je souhaite realise un affichage multicolonne dans listebox en fonction de conditon issue de combobox .

mais je coince un peu
1) ma listbox n'affiche que le contenu de la 1 er colonne et rien d'autre
2)il semble qu'il n'y a pas d'interaction entre les combobox et l'affichage


merci de votre aide

Dans le spropriétés de ta listBox, il faut que ut mette le nombre de colonne que tu veux, et mettre aussi dans le Widtdh les largeurs de tes n colonnes, séparés par des ';', genre :

2;2;3

De plus, pour ma part, je faisait ça :

Code:

---

ListBox1.Column(1, compteur)

---

au lieu de ce que tu as écrit :

Code:

---

ListBox1.List(i, 0)

---

Essaye de voir avec Column, et de le faire avec tes données pour voir ce que ça donne :)

bonjour illight

merci de tes reponse mais peut etre un peu plus precis
je maitrise pas du tout les listbox et le mulit colonne:(

bonjour
actuellement j'ai rajoute suite aux conseil illight


dans mon code

Code:

---

1 2 3 4 5 6 7

Private Sub UserForm_initialize() ListBox1.Clear ListBox1.BoundColumn = 7 'nb de colonne   .........................................

---

au lancement il apparait bien 2 colonne avec la totalite des donnees de la feuil2 mais seulment sur 2 colonnes ?????


alors que j'ai declare 7 colonne
et demander l'affichage sur 7 (pour l'exemple j'en ai que sur 3 )

Code:

---

1 2 3 4 5 6 7 8 9 10 11

.......... If Sheets("feuil2").Cells(lignedebut, 1) = Cu1 And Sheets("feuil2").Cells(lignedebut, 2) = Cu2 And Sheets("feuil2").Cells(lignedebut, 3) = Cu3 And Sheets("feuil2").Cells(lignedebut, 14) = Cu4 Then ListBox1.AddItem ListBox1.List(j, 0) = Sheets("feuil2").Cells(lignedebut, 1).Value ListBox1.List(j, 1) = Sheets("feuil2").Cells(lignedebut, 2).Value ListBox1.List(j, 2) = Sheets("feuil2").Cells(lignedebut, 6).Value j = j + 1     End If

---

je rajoute comme le montre le la feuil mes donnees ne sont pas forcement contigues....

partiellement resolu



:)

merci

bonjour
pour definir mon listbox
à l'initialisation du USF

Code:

---

1 2 3 4 5 6

Private Sub UserForm_initialize() ListBox1.Clear ListBox1.BoundColumn = 7 ListBox1.ColumnWidths = 40; 20; 30; .........

---

il me renvoi une erreur une erreur de syntaxe sur

Code:

---

1 2	ListBox1.ColumnWidths = 40; 20; 30;

---

.
d'apres mezs recherches il semblerait que ce soit la bonne syntaxe. :aie: