Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Protection d'execution d'un commandButton

  • Initiateur de la discussion Initiateur de la discussion agir2
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

A

agir2

Guest
Bonjour !

Je voudrais une demande de mot de passe au clic d'un commandButton,
évitant ainsi les clic accidentel !

J'ai inclus mon classeur en pièce jointe

MERCI !
🙄
 

Pièces jointes

Re : Protection d'execution d'un commandButton

Hello,

Le plus simple, un truc du style...
Code:
Private Sub CommandButton1_Click()
    
        x = InputBox("Veuillez entrer le mot de passe !", "Mot de passe")
        If x = "xxxxxx" Then
            Range("B6:B10").Select
            Selection.ClearContents
        Else
            MsgBox "Mot de passe incorrect !"
            Exit Sub
        End If

End Sub
Bien sur, il est améliorable !

Cdt, Hulk.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Réponses
6
Affichages
416
Réponses
5
Affichages
199
  • Question Question
Microsoft 365 Fonction si
Réponses
7
Affichages
223
Réponses
4
Affichages
322
Réponses
2
Affichages
192
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…