Bonjour,
je souhaiterai cacher la saisie d'un mot de passe dans un inputbox.
J'ai créé un bouton de commande qui me permet de lancer mon programme en ouvrant mon userform , cette commande est protégé par un mot de passe mais sa saisie n'est pas masqué par des *****. comment faire?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Sub Bouton1_Clic() Dim mdp As String mdp = InputBox("Entrez le mot de passe") If mdp = "toto" Then UserForm1.Show Else: MsgBox ("Mauvais mot de passe") Exit Sub Feuil3.Visible = True End If End Sub
Partager