Range excel dans listbox vb [Résolu]

Signaler
Messages postés
40
Date d'inscription
samedi 27 septembre 2003
Statut
Membre
Dernière intervention
20 février 2009
-
Messages postés
40
Date d'inscription
samedi 27 septembre 2003
Statut
Membre
Dernière intervention
20 février 2009
-
Salut, qui pourrait me dire comment dans une listbox vb afficher le contenu d' un range excel. Ex sheet("test").range("a1:a10")
merci et meilleurs voeux a tous

bucheron a+

5 réponses

Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
33
Tu n'a qu'a rajouter une boucle

Dim iRow As Integer

For iRow = 1 To 10
ListBox1.AddItem (Cells(iRow, 2))
Next iRow

For iRow = 1 To 10
ListBox1.AddItem (Cells(iRow, 4))
Next iRow

Mais après, si tu dois en faire d'autre, je te conseil de faire une fonction. Ca évitera d'avoir 10 boucle

Kenji
<hr size="2" width="100%">
Merci de cliquer sur "Réponse acceptée" si une réponse vous convient.
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 82 internautes nous ont dit merci ce mois-ci

Messages postés
3172
Date d'inscription
dimanche 15 février 2004
Statut
Membre
Dernière intervention
9 avril 2017
33
Bonjour,

On boucle de A1 jusqu'a A10 et on ajoute chaque cellule dans la listbox

Dim iRow As Integer
For iRow = 1 To 10
ListBox1.AddItem (Sheet("test").Cells(iRow, 1))
Next iRow

Kenji
<hr size="2" width="100%">
Merci de cliquer sur "Réponse acceptée" si une réponse vous convient.
Messages postés
40
Date d'inscription
samedi 27 septembre 2003
Statut
Membre
Dernière intervention
20 février 2009

Merci Kenji je vais essayer

bucheron a+
Messages postés
40
Date d'inscription
samedi 27 septembre 2003
Statut
Membre
Dernière intervention
20 février 2009

ca fonctionne mais ca n' affiche que la premiere colonne comment faire pour afficher range("b1:b10") ou ("c1:c10"). Y-a-t' il un moyen d' afficher plusieures colonnes en meme temps ex. range("b1:b10")+range("d1:d10").merci

bucheron a+
Messages postés
40
Date d'inscription
samedi 27 septembre 2003
Statut
Membre
Dernière intervention
20 février 2009

merci Kenji pour ton aide et meilleurs voeux a toi et a ta famille A+

bucheron a+