Discussion :

[ludobado]

Bonjour,

J'ai deux zones de listes, je veux faire passer des elements de la premiere dans la deuxieme en cliquant sur un bouton commande!
J'arrive a faire passer un element mais quand je veux faire passer le deuxième il efface le premier et s'affiche a sa place ! Je souhaiterai qui s'affiche en dessous !

Merci pour votre aide

[Faw]

Salut, tu fais ça comment? avec additem? en affectant un rowsouce?...

[ludobado]

Je fais ca avec un RowSource car additem n'est pas valable sur ma version de access

[Faw]

mets ton code stp

[ludobado]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub cmd_ajouter_Click()
Me!lst_ajoutFiliere.RowSource = Me!lst_ajoutFiliere & Me!lst_filiere.Column(0) & ";" & Me!lst_filiere.Column(1) & ";" & Me!lst_filiere.Column(2) & ";"
End Sub

[Faw]

et comme ça?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me!lst_ajoutFiliere.RowSource = Me!lst_ajoutFiliere & ";" & Me!lst_filiere.Column(0) & ";" & Me!lst_filiere.Column(1) & ";" & Me!lst_filiere.Column(2) & ";"

edit:
Oups pas vu que tu le mets à la fin le ";" ça ne va rien changer...
tu fais bien un requery après non?

[ludobado]

non je fais pas de requery, je dois ?

[Tofalu]

En cherchant dans les pages sources :

http://access.developpez.com/sources...terListeValeur
http://access.developpez.com/sources...erListeRequete

[Faw]

Oui tu dois faire un requery mais le problème est tout bête je viens de
le voir

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Me!lst_ajoutFiliere.RowSource = Me!lst_ajoutFiliere.RowSource & Me!lst_filiere.Column(0) & ";" & Me!lst_filiere.Column(1) & ";" & Me!lst_filiere.Column(2) & ";"