Remplir colonne zone de liste vba [Résolu]

[KpRR_]

Bonjour a tous, j'ai un petit problème je n'arrive pas a remplir la deuxième colonne de ma zone de liste.
Comment accéder a cette colonne ?

Merci d'avance, cordialement KpR

[helas]

Bonjour,
Ca peut ressembler à ça.

Code :

1
2
3
4
5
6
7
 
 Me!liste.ListRows = 3    'nombre de colonnes
 Me!liste.RowSourceType = "Value List"   'type de valeurs
 Me!liste.AddItem "un;one;ein"     'les données de la liste
 Me!liste.AddItem "deux;two;zwei"
 Me!liste.AddItem "trois;tree;drei"
 Me!liste.Requery

liste est bien entendu le nom de la liste déroulante

[KpRR_]

Merci de ta réponse, ça fonctionne, seul problème, mes données sont stocké dans une variable, et il n'accepte pas ce code :

Code :

1
2
3
    Titre = enr.Fields("TitreAlbum").Value
    num = enr.Fields("IDAlbum").Value
    Me.liste_album.AddItem num;titre

Comment faire ? Merci encore.

[dumas.blr]

Houla ! il Faut bien faire attention avec la syntaxe.

quand tu vois la syntaxe

Code :

Me!liste.AddItem "un;one;ein"

Tu peux remarquer qur tu insère 3 colonnes dans ta liste sur 1 ligne, et que l'élément du Additem est une chaine de caractère unique.
Les ';' servent de séparateurs à ta liste

Pour faire les choses proprement, je te conseille la méthode suivante (si tu souhaite utiliser la méthode de Helas

Code :

1
2
3
4
5
dim MonItemARajouter as string
 
....
MonItemARajouter = num & ";" & titre
Me.liste_album.AddItem MonItemARajouter

Ca marchera beaucoup mieux.

[KpRR_]

Merci beaucoup ça marche ! (=
Bonne journée a vous & joyeux noel