Contrôle de sélection dans une listbox

Bonjour à tous,

Je me prends la tête sur le contrôle de sélection d'une listbox : en effet, je voudrai bloquer le lancement d'un traitement si l'utilisateur n'a sélectionné aucun champ de la listbox.

Du coup, j'utilise ce code :

Code:

---

1 2 3

Private Sub CommandButton1_Click() If IsNull(ListBox1.Value) = True Then MsgBox "Vous devez sélectionner qqch" End Sub

---

Alors, ça m'affiche effectivement le message d'erreur lorsque je n'ai aucun champ de sélectionné... Mais aussi quand j'en ai 1 ou plus.
Je tiens à préciser que j'ai activé la multi-sélection sur ma ListBox, si jamais ça peut avoir une incidence.

"ListBox1" Correspond bien au nom de ma listbox.


Si vous pouvez m'aider à résoudre mon problème..
Merci et bon week-end !

Salut,

tu es dans le cas de figure d'une listbox multi selection =]

Tu dois passer par une boucle pour tester si une valeur est selectionnee ou non

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Dim i As Integer Dim bOK as Boolean For i = 0 to ListBox1.ListCount -1 If ListBox1.Selected(i) Then bOK=True Exit For End If Next i If bOK Then Msgbox "valeur selectionnee" End if

---

Salut !

Super merci de ta réponse rapide, ça fonctionne super !