Selection multiple dans une listbox

Bonjour,
J'ai créé un userform avec une listbox.
Quand l'userform s'initialise, je charge les valeurs de la liste box via

Code:

---

Listbox1.additem "exemple"

---

Jusque là tout va bien, j'ai les bon choix dans ma listbox.
Maintenant j'ai activé la selection multiple, donc je peux selectionner plusieures valeures.

Comment faire pour utiliser les valeures selectionnées.

J'ai essayé de faire

Code:

---

1 2	for i =1 to listbox1.listcount If listbox1.selected(i)=true then...

---

J'ai aussi essayé

Code:

---

if listbox1.item(i).selected=true then

---

Mais dans les deux cas j'ai une erreur.

Comment faire?

Bonjour
Il faut partir de 0 et aller jusqu'a listcount-1

Code:

---

1 2 3

For i = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(i) = True Then MsgBox ListBox1.List(i) Next i

---

Un petit lien vers un faq qui devrais t'intéresser
http://silkyroad.developpez.com/VBA/...serForm/#LII-G

Merci, en fait il fallait que je fasse:

Code:

---

1 2 3

With listbox1 if .selected=true then... end with

---

Hmm il doit manquer un truc non?
Car chez moi selected demande un argument et tel quel ca plante ou alors j'ai raté un truc et on ne parle pas de la même chose

Surtout que la je ne voix pas comment tu sais ce qui a été selectionné :roll:

Enfin si c'est bon pense au :resolu: mais j'aimerais bien comprendre le pourquoi du comment :mouarf:

Effectivement je me suis trompé c'est bien

Code:

---

1 2 3

With lisbox1 if .selected(i)=true then... end with

---

dans ce cas

Code:

---

1 2 3

With lisbox1 if .selected(i)=true then... end with

---

est strictement identique a

Code:

---

1 2	if lisbox1.selected(i)=true then...

---

Du coup si tu n'as pas modifier le reste du code je suis toujours aussi sceptique

Voici le lien vers une discussion ou j'ai mis tous le code:
http://www.developpez.net/forums/d79...m/#post4571054
Je pensais aussi comme toi mais visiblement il doit y avoir quelque chose de différent.

Peut être une faute de frappe la première fois qui sait :mouarf: Quoi qu'il en soit je ne suis pas sur que tu détecte la selection de la première ligne de ta liste box tu devrais faire quelque test pour voir

Code:

---

If ListBox1.Selected(i) = True Then nom = ListBox1.List(i)

---

cela fonctionne bien chez moi
mais bon ne nous attardons pas la dessus je vais voir si j'ai une idée pour ton autre soucis

J'ai fait exprès de commencer à la 2ème ligne de ma list box, la première ligne est "Toutes", et dans listbox change, si la valeur est "toutes" alors je selectionne toutes les autres lignes de la liste box.