Récupérer les valeurs d'une listbox.

[Mattharm]

Bonsoir,

J'ai une listbox et dans une boucle j'aimerais comparer les données par rapport à la combobox2.

J'ai écris ca mais ça ne fonctionne pas :

For compte = 0 To ListBox1.ListCount - 1
If ComboBox2.List(ComboBox.ListIndex) = ListBox1.List(compte) Then
MsgBox "Oui"
Else: MsgBox "Non"
End If

Next

Somebody can help me ??

Merci
matthieu

 

[pierrejean]

Re : Récupérer les valeurs d'une listbox.

bonsoir Mattharm

si j'ai bien compris ton probleme !!

teste

MsgBox (ListBox1.List(2))

sachant que List va de 0 a List.count

 

[Mattharm]

Re : Récupérer les valeurs d'une listbox.

Salut pierrejean merci beaucoup pour ta réponse,

en fait j'ai changé ma question 🙁
Mais encore merci !

Peux tu m'aider sur ma nouvelle question ?? 🙂 😀

 

[Robert]

Re : Récupérer les valeurs d'une listbox.

Bonsoir Mattharm, PierreJean, bonsoir le forum,

peut-être quelquechose comme ça :

Dim x As Integer, y As Integer, z As Integer
 
For x = 0 To ListBox1.ListCount - 1
    For y = 0 To ComboBox1.ListCount - 1
        If ListBox1.List(x) = ComboBox1.List(y) Then
            MsgBox "Oui"
            z = z + 1
        Else
            MsgBox "Non"
        End If
    Next y
Next compte
MsgBox "Il y a " & z & " valeurs identiques dans la ListBox et la ComboBox."

 

[Mattharm]

Re : Récupérer les valeurs d'une listbox.

Hello !

Merci beaucoup pour cette réponse !
Ca fonctionne bien 😉

Merci
Matthieu