Mot de passe de bouton de macro commande
Résolu
remthesaiyan
-
remthesaiyan -
remthesaiyan -
A voir également:
- Mot de passe de bouton de macro commande
- Trousseau mot de passe iphone - Guide
- Invite de commande - Guide
- Mot de passe - Guide
- Mot de passe administrateur - Guide
- Mot de passe bios perdu - Guide
3 réponses
Salut,
Dans le code de ton commandbutton "click" places ceci : remplace toto par le mot de passe que tu souhaites...
Dans le code de ton commandbutton "click" places ceci : remplace toto par le mot de passe que tu souhaites...
Private Sub CommandButton1_Click()
Dim reponse As String
reponse = InputBox("Saisir le Mot de Passe", "Password")
If reponse <> "toto" Then Exit Sub
'ici mets ta procédure de protection de feuille...
End Sub
tout ce que tu veux, puisque c'est demandé gentiment :
Avec trois essais :
Private Sub CommandButton1_Click()
Dim reponse As String
reponse = InputBox("Saisir le Mot de Passe", "Password")
If reponse <> "toto" Then
MsgBox "Mot de passe erroné"
Exit Sub
End If
'ici mets ta procédure de protection de feuille...
End Sub
Avec trois essais :
Private Sub CommandButton1_Click()
Dim reponse As String
Dim cpt As Integer
suivant:
reponse = InputBox("Saisir le Mot de Passe", "Password")
If reponse <> "toto" Then
MsgBox "mot de passe erroné"
End If
If cpt <> 2 Then
cpt = cpt + 1
GoTo suivant
Else
MsgBox "Vous avez tenté 3 fois votre chance... PERDU!!"
Exit Sub
End If
MsgBox reponse
End Sub