B
benoit
Guest
Bonjour,
J' ai un classeur qui s' ouvre sur une feuille sur laquelle se trouvent 3 boutons de commande qui permettent d' accéder aux autres feuilles.
J' ai protégé l' accès à ces feuilles en mettant dans chaque bouton le code suivant qui demande le mot de passe :
Dim Password As String
Password = Application.InputBox(prompt:='Entrez le mot de passe', Title:='Verrouillage', Default:='', Type:=2)
If Not (Password = 'toto') Then Exit Sub
Je voudrais remplacer ça par un usf qui demande le mot de passe et qui me débloque les 3 boutons en même temps.
L' usf je sais faire par contre je bloque sur le code du bouton OK.
C' est possible ?
Merci.
J' ai un classeur qui s' ouvre sur une feuille sur laquelle se trouvent 3 boutons de commande qui permettent d' accéder aux autres feuilles.
J' ai protégé l' accès à ces feuilles en mettant dans chaque bouton le code suivant qui demande le mot de passe :
Dim Password As String
Password = Application.InputBox(prompt:='Entrez le mot de passe', Title:='Verrouillage', Default:='', Type:=2)
If Not (Password = 'toto') Then Exit Sub
Je voudrais remplacer ça par un usf qui demande le mot de passe et qui me débloque les 3 boutons en même temps.
L' usf je sais faire par contre je bloque sur le code du bouton OK.
C' est possible ?
Merci.