Macro masquer feuille avec mot de passe [Résolu]

Signaler
Messages postés
16
Date d'inscription
mardi 27 décembre 2016
Statut
Membre
Dernière intervention
19 mai 2020
-
Messages postés
16
Date d'inscription
mardi 27 décembre 2016
Statut
Membre
Dernière intervention
19 mai 2020
-
Bonjour,
Concernant la macro de Greg (option1), je n'y arrive pas! puis avoir un fichier excel avac la macro svp?
Merci bien

1 réponse

Messages postés
16
Date d'inscription
mardi 27 décembre 2016
Statut
Membre
Dernière intervention
19 mai 2020

Oups , j'ai trouvé sur le site
Private Sub Worksheet_Activate()
Dim REP As String
Columns("A:XFD").EntireColumn.Hidden = True
REP = InputBox("PASSWORD", "OUVERTURE FEUILLE RECAP ASSO")
If REP = "YOURPASSWORD" Then
Columns("A:XFD").EntireColumn.Hidden = False
ActiveSheet.Cells(1, 1).Select
End If
End Sub

Merci