VBA Masquer des feuilles en fonction d'une liste Résolu

Question

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

cs_Le Pivert · Answer

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

CHARLYJACK · Answer

Super

merci beaucoup !!!

VBA Masquer des feuilles en fonction d'une liste

2 réponses

Discussions similaires

Newsletters