Mot de passe de bouton de macro commande
Résolu
remthesaiyan
-
remthesaiyan -
remthesaiyan -
Bonjour,
Je souhaiterai créer un bouton de commande sur lequel est rattaché une macro qui protège la feuille.
mais je voudrais également que ce bouton demande d'abord un mot de passe
Quelqu'un voit comment faire?
Merci
Cordialement
Je souhaiterai créer un bouton de commande sur lequel est rattaché une macro qui protège la feuille.
mais je voudrais également que ce bouton demande d'abord un mot de passe
Quelqu'un voit comment faire?
Merci
Cordialement
A voir également:
- Mot de passe de bouton de macro commande
- Trousseau mot de passe iphone - Guide
- Mot de passe - Guide
- Invite de commande - 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
