Masquer plusieurs feuilles si macros non activés
Fermé
Micmicdu26
-
10 mars 2023 à 06:46
Le Pingou Messages postés 12198 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 21 novembre 2024 - 10 mars 2023 à 07:04
Le Pingou Messages postés 12198 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 21 novembre 2024 - 10 mars 2023 à 07:04
A voir également:
- Masquer plusieurs feuilles si macros non activés
- Masquer conversation whatsapp - Guide
- Fusionner plusieurs feuilles excel en une seule - Guide
- Comment faire un livret avec des feuilles a4 - Guide
- Comment masquer les amis sur facebook - Guide
- Masquer application android - Guide
1 réponse
Le Pingou
Messages postés
12198
Date d'inscription
mercredi 11 août 2004
Statut
Contributeur
Dernière intervention
21 novembre 2024
1 450
Modifié le 10 mars 2023 à 07:48
Modifié le 10 mars 2023 à 07:48
Bonjour,
Pour afficher / masquer les feuilles sauf celle d'accueil:
Sub Masquer()
'Masque toutes les feuilles sauf la feuille Accueil
Dim sh As Worksheet
For Each sh In Worksheets
If sh.Name <> "Accueil" Then sh.Visible = xlSheetHidden
Next sh
End Sub
Sub Afficher()
'Affiche toutes les feuilles
Dim sh As Worksheet
For Each sh In Worksheets
sh.Visible = xlSheetVisible
Next sh
End Sub
Une possibilité, utiliser extension xlsm et à l’ouverture du classeur masquer toutes les feuilles sauf l’accueil. Pour activer les macros vous obliger d’utiliser un mot de passe qui peut-être différent pour chaque personnes !