remplir une ListBox à plusieurs colonnes

[Bill]

Bonjour à toutes et à tous.
Quelle est la méthode pour remplir une ‘ ListBox ‘ ayant plusieurs colonnes avec l’instruction ‘Additem’ les données seraient issues de cellules pas forcement concomitantes du genre : xxx.offset(0, 1) pour la colonne 1 et xxx.offset(0, 4) pour la colonne 2.

Merci d’avance.

 

[Zon]

Salut,

Peut être une boucle de ce genre,
dim I as long,J as long
talistbox.columncount=3
with sheets("Tafeuille")
for =1 to nbatoidevoir
talistbox.additem .Range("A" & i) '1 ere col
talistbox.list(J,1)=.Range("E" & i) '2 eme col
talistbox.list(J,2)=.Range("K" & i) '3 eme col
j=j+1
next I
end with

A+++