[VBA] Incrémenter une zone de liste à partir d'une table access!

Question

Bonjour je voudrai incrémenter une zone de liste appelée "Liste01" avec le champ "C_Nom" se trouvant dans la  "Tb_Précences".


Set Présences = MaBd.OpenRecordset("SELECT C_Nom FROM Tb_Présences ;")

         Do While Not Présences.EOF
            Liste01.AddItem (Présences!C_Nom) ' Cette commande ne marche pas!!!
            Présences.MoveNext
         Loop
          
Pouvez vous m'aider??

cs_Orohena · Answer

Bonjour done29


Peux-tu essayer avec la propriété RowSource ?



Do While Not Présences.EOF
    source = source & ";" & Présences!C_Nom
    Présences.MoveNext
Loop
Liste01.RowSource = Mid(source, 2)
Me.Requery

done29 · Answer

Merci mais ça ne marche pas!! Il me fait une erreur de compilation "utilisation incorecte du mot clé Me"

cs_Jack · Answer

Salut
Pas assez précis : Ca veut dire quoi "Cette commande ne marche pas!!!" ?
Erreur ? laquelle ?
Insertion vide ?
Essaye en retirant les parenthèses

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

<hr />Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

cs_Jack · Answer

PS : Le VBA est du VBA, pas du .Net
Fais-y attention la prochaine fois, ça évitera de passer à côté des solutions

[VBA] Incrémenter une zone de liste à partir d'une table access!

4 réponses

Votre réponse