Ouverture USF sous conditions

Bonjour à tous,

J'ai un petit souci avec l'ouverture de mon userform. Voilà ce que je souhaitais obtenir : Après remplissage de la textbox1, si la sélection dans la combobox est différente de Mr, Mme ou Melle, l'userform2 s'ouvre.

Je pensais qu'écrire cette ligne de code serait toute simple mais voilà, elle ne fonctionne pas. Pourtant elle me semblait logique.

Private Sub TextBox1_AfterUpdate()

If ComboBox1.Value <> "Mr" Or ComboBox1.Value <> "Mme" Or ComboBox1.Value <> "Melle" Then

UserForm2.Show

End If

End Sub

Je joins un fichier qui sera peut être plus explicite

Si l'un d'entre vous pouvait m'éclairer un peu, cela m'arrangerait bien.

Merci

Salut le forum

utilise un And au-lieu d'un Or

Private Sub TextBox1_AfterUpdate()
With ComboBox1
  If (.Value <> "Mr" And .Value <> "Mme" And .Value <> "Melle") Then
    UserForm2.Show
  End If
End With
End Sub

Mytå

Bonsoir

A la place des Or mets des And

Private Sub TextBox1_AfterUpdate()
  If ComboBox1.Value <> "Mr" And ComboBox1.Value <> "Mme" AndComboBox1.Value <> "Melle" Then
    UserForm2.Show
  End If
End Sub

Un grand merci pour vos réponses. Tout est OK