XL 2019 VBA Vérifier si deux combobox sont remplies sinon exit sub

[donpopo]

Bonsoir le forum,

J'ai un petit souci; j'ai deux combobox sur un userform; je souhaiterais pouvoir obliger l'utilisateur à remplir ces deux combo.
Sinon, j’afficherais un message et un exit sub.

Je ne vois pas comment faire.
J'ai encodé ceci:

If ComboBoxLoc.ListIndex <> -1 Then
        MsgBox "Introduire un nom de locataire !"
        Exit Sub
    End If
    If ComboBoxBien.ListIndex <> -1 Then
        MsgBox "Introduire un bien lié !"
        Exit Sub
    End If

Mais cela ne fonctionne pas; si j'introduis un nom dans combo1 et non dans combo2, ok j'ai un message; mais si par après, je complète le combo2, j'ai un autre message me demandant de remplir le combo1 pourtant déjà rempli.

Je ne comprends pas.

Pourriez-vous m'aider?

donpopo

 

[job75]

Bonjour donpopo,

Remplacez <> -1 par = -1

A+

 

[donpopo]

Bonsoir et merci job75.

Jamais pensé à cela.

Bonne soirée