Bonjour

Je veux ouvrir mon userform avec mot de passe.
Mon code fonctionne bien pour un seul mot de passe, je souhaite que 2 ou trois mots de passe différents puissent l'ouvrir avec le même bouton. Est ce possible?
Les 5 mots de passe différents sont dans la feuille "Mdp" range B1 à B5

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub CommandButton1_Click()
Dim Mdp As String
 
recom:
Mdp = InputBox("Veuillez saisir votre mot de passe", "Mot de passe")
 
If Mdp = Sheets("mdp").Range("b2").Value Then
    UserForm6.Show
 
  Else
    If MsgBox("Mot de passe non valide, voulez-vous réessayer ?", vbExclamation + vbRetryCancel, "Mot de passe incorrect") = vbRetry Then GoTo recom
End If
 
End Sub
Merci