Masquer une feuille d'excel avec 1mot2passe

shahrazed -  
pijaku Messages postés 13513 Statut Modérateur -
Bonjour,
j'aimerai s'avoir comment je peu protéger ma feuille masquer avec un mot de passe c ta dire c je clique sur afficher une boite de dialogue s'affiche pour mettre le mot de passe merci


<config>Windows 7 / Safari 537.1</config>
A voir également:

4 réponses

Mike-31 Messages postés 19571 Statut Contributeur 5 137
 
Salut,

ce code rend la feuil2 invisible
Sub Cache()

Worksheets("Feuil2").visible = xlVeryHidden 'xlSheetHidden
End Sub

ce code demande un mot de passe pour afficher la feuille2 qui est toto

Sub visible()
Dim Mdp
retour:
Mdp = InputBox("Entrez le mot de passe", "Avertissement : l'accès aux Feuilles est sécurisé ")
' If Mdp = "" Then Exit Sub
If Mdp <> "toto" Then Exit Sub
Worksheets("TM00").visible = True
End Sub

https://www.cjoint.com/?BHqnPal8Hlj

A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.
0
pijaku Messages postés 13513 Statut Modérateur 2 763
 
Salut Mike,

Excuse mon intervention, je n'avais pas rafraichit...

En espérant que tout va bene pour toi.

Bonne journée!
0