Pb de Listbox +sieurs colonnes

[pilou]

J'ai 2 listbox à 2 colonnes.
Avec une boucle, j'arrive a remplir la seconde listbox (à partir d'une feuille excel) mais uniquement la première colonne. (additem)
Exemple
Ma feuille excel contient en 4 colonnes
DUPOND JEAN 45000 ORLEANS
1ère liste contient DUPOND Jean
et je voudrais que ma 2ème listbox contienne
colonne1 --> 45000
colonne2 --> ORLEANS

Merci d'avance d'aider un débutant.........

 

[PascalXLD]

Bonjour

avec la methode additem tu peux faire

for x = 2 to range('A65536').end(xlup).row
me.LISBOX1.additem range('C' & x)
me.listbox1.list(me.listbox1.listcount-1,1)= range('D' & x)
next

Bon courage

Message édité par: Pascal76, à: 10/03/2005 19:02

 

[ChTi160]

Salut 'pilou' et Pascal76 Oups j'avais pas vu pascal je rajoute
en exemple n'hésite pas

With UserForm1.ListBox1
.ColumnCount = 2 'listbox à 2 colonnes
.ColumnWidths = '50;50' 'largeur des colonnes
.AddItem Cellule ' premiere cellule
.List(.ListCount - 1, 1) = cellule 2
.List(.ListCount - 1, 2) = cellule 3
End With

Message édité par: ChTi160, à: 10/03/2005 19:04

 

[pilou]

Merci ça marche super

Quelle réactivité !

Merci encore

 

[pilou]

Merci c'est très sympa de m'avoir dépanné. Et si vite

Tu es du 76 ?
Moi aussi !
Quelle région ?
Moi près d'Yvetot

A+ et merci encore