Macro masquer feuille avec mot de passe
Résolu/Fermé
PIERRO1234
Messages postés
19
Date d'inscription
mardi 27 décembre 2016
Statut
Membre
Dernière intervention
27 août 2022
-
19 mai 2020 à 10:01
PIERRO1234 Messages postés 19 Date d'inscription mardi 27 décembre 2016 Statut Membre Dernière intervention 27 août 2022 - 19 mai 2020 à 10:05
PIERRO1234 Messages postés 19 Date d'inscription mardi 27 décembre 2016 Statut Membre Dernière intervention 27 août 2022 - 19 mai 2020 à 10:05
A voir également:
- Masquer feuille excel avec mot de passe
- Piratage facebook changer mot de passe - Guide
- Voir mot de passe wifi android - Guide
- Mot de passe administrateur - Guide
- Mettre un mot de passe sur un dossier - Guide
- Liste déroulante excel - Guide
1 réponse
PIERRO1234
Messages postés
19
Date d'inscription
mardi 27 décembre 2016
Statut
Membre
Dernière intervention
27 août 2022
19 mai 2020 à 10:05
19 mai 2020 à 10:05
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
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