Rapport de message :*
 

Mot de passe sur bouton

Titre du sujet : Mot de passe sur bouton
par Débutant le 21/04/2013 10:45:38

Bonjour à tous,

j'ai mis un mot de passe sur un bouton, afin d'empêcher les autres utilisateurs d'accéder aux onglets du tableau.

Le problème, c'est que le mot de passe apparait en clair dans l'inputbox.

Comment faire pour qu'il apparaisse masqué? ( ******)

Merci pour votre aide.

Ps : voici le code vba :

Private Sub CommandButton4_Click()
Dim sPass As String
If MsgBox("Etes-vous le concepteur du programme ?", 4 + 32, "Demande du concepteur") = vbYes Then
Else
End
End If
Do
sPass = InputBox("Veuillez saisir le mot de passe")
If sPass = "mon mdp" Then
Exit Do
End If
Loop While 1 = 1
ActiveWindow.DisplayWorkbookTabs = True
End Sub