Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

ListBox AddItem

Spock

XLDnaute Occasionnel
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

XLDnaute Barbatruc
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
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…