VBA Masquer des feuilles en fonction d'une liste
Résolu
CHARLYJACK
Messages postés
345
Date d'inscription
Statut
Membre
Dernière intervention
-
CHARLYJACK Messages postés 345 Date d'inscription Statut Membre Dernière intervention -
CHARLYJACK Messages postés 345 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
je cherche un code pour masquer des feuille d'un classeur excel en fonction de leurs noms.
J'ai 12 feuilles portant le nom des mois.
J'ai 1 onglet parametrage dans lequel j'ai la liste des feuilles en colonne B1:B12 (janvier, février ....) et en F10 le mois en cours.
J'aimerais trouver un code qui compare F10 à à la colonne B et en fonction du mois en cours masquer les mois qui suivent.
Par avance merci
A voir également:
- VBA Masquer des feuilles en fonction d'une liste
- Liste déroulante excel - Guide
- Fonction si et - Guide
- Comment faire un livret avec des feuilles a4 - Guide
- Comment masquer sa liste d'amis sur facebook mobile - Guide
- Liste déroulante en cascade - Guide
2 réponses
Bonjour,
Si tu veux avoir le mois en cours affiché et les autres mois masqués, mettre ce code dans ThisWorkbook:
Option Explicit
Option Compare Text
Private Sub Workbook_Open()
Dim Ws As Worksheet
For Each Ws In ThisWorkbook.Worksheets
If Ws.Name = Format(Now, "mmmm") Then
Ws.Visible = xlSheetVisible
Else
Ws.Visible = xlSheetVeryHidden
End If
Next Ws
End Sub