Je voudrais récupérer différentes informations en provenance d'une base
Access dans une ListBox de 2 colonnes.
Malheureusement, avec mon code, ces infos seplacent toutes à la suite dans
la 1ère colonne de la ListBox.
Quelqu'un peut-il m'éclairer ?
D'avance merci
José
Voici le code que j'utilise :
Do While Not adorecordset.EOF()
UserForm1.ListBox1.AddItem adorecordset!nom
UserForm1.ListBox1.AddItem adorecordset!id_commune
adorecordset.MoveNext
Loop
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jean-Paul Viel
Bonjour,
Modifier votre code comme suit:
intN=1
Do While Not adorecordset.EOF() UserForm1.ListBox1.AddItem adorecordset!nom UserForm1.ListBox1. List(intN - 1, 1) orecordset!id_commune
adorecordset.MoveNext
intN=intN+1 Loop
-- JP
http://www.solutionsvba.com
"José" wrote in message news:3f674012$0$27020$
Bonsoir,
Je voudrais récupérer différentes informations en provenance d'une base Access dans une ListBox de 2 colonnes. Malheureusement, avec mon code, ces infos seplacent toutes à la suite dans la 1ère colonne de la ListBox. Quelqu'un peut-il m'éclairer ? D'avance merci José
Voici le code que j'utilise :
Do While Not adorecordset.EOF() UserForm1.ListBox1.AddItem adorecordset!nom UserForm1.ListBox1.AddItem adorecordset!id_commune adorecordset.MoveNext Loop
Bonjour,
Modifier votre code comme suit:
intN=1
Do While Not adorecordset.EOF()
UserForm1.ListBox1.AddItem adorecordset!nom
UserForm1.ListBox1. List(intN - 1, 1) orecordset!id_commune
"José" <perez.jose@free.fr> wrote in message
news:3f674012$0$27020$626a54ce@news.free.fr...
Bonsoir,
Je voudrais récupérer différentes informations en provenance d'une base
Access dans une ListBox de 2 colonnes.
Malheureusement, avec mon code, ces infos seplacent toutes à la suite dans
la 1ère colonne de la ListBox.
Quelqu'un peut-il m'éclairer ?
D'avance merci
José
Voici le code que j'utilise :
Do While Not adorecordset.EOF()
UserForm1.ListBox1.AddItem adorecordset!nom
UserForm1.ListBox1.AddItem adorecordset!id_commune
adorecordset.MoveNext
Loop
Do While Not adorecordset.EOF() UserForm1.ListBox1.AddItem adorecordset!nom UserForm1.ListBox1. List(intN - 1, 1) orecordset!id_commune
adorecordset.MoveNext
intN=intN+1 Loop
-- JP
http://www.solutionsvba.com
"José" wrote in message news:3f674012$0$27020$
Bonsoir,
Je voudrais récupérer différentes informations en provenance d'une base Access dans une ListBox de 2 colonnes. Malheureusement, avec mon code, ces infos seplacent toutes à la suite dans la 1ère colonne de la ListBox. Quelqu'un peut-il m'éclairer ? D'avance merci José
Voici le code que j'utilise :
Do While Not adorecordset.EOF() UserForm1.ListBox1.AddItem adorecordset!nom UserForm1.ListBox1.AddItem adorecordset!id_commune adorecordset.MoveNext Loop
