ListBox AddItem

[Spock]

Bonjour toutes et tous,

Je cale sur le probleme suivant :

Comment faire un AddItem de ma ListBox1 de données d'Access.
La BD access, fait 12 colonnes.

Disons: Frm1.ListBox1 doit, au chargement du form se remplir des données sur 12 colonnes de Stock.mdb.

Une idée ?, je rame completement.

Merci !

 

[MichelXld]

bonsoir

tu peux tester une procedure de ce style

Do While Not rsT.EOF 'boucle sur les données
UserForm1.ListBox2.AddItem , N
For i = 0 To rsT.Fields.Count - 1
UserForm1.ListBox2.List(N, i) = rsT.Fields(i).Value
Next i
N = N + 1
rsT.MoveNext
Loop



l'exemple complet dans ce classeur

Lien supprimé

et la base à placer dans le meme repertoire

Lien supprimé



bonne soiree
MichelXld

 

[Spock]

Salut,

Je vais essayer

Merci