Masquer des colonnes

Bonjour

je souhaite masquer des colonnes d'un tableau comportant sur une ligne (L5) des N° de semaine,

mais uniquement les semaines passées, mais pas la colonne en cours (la dernière ayant des valeurs) et celles qui suivent.

je vous un fichier Excel .

merci de votre aide

Bonjour Fred56,

Tu peux utiliser ce code, par exemple

Private Sub Workbook_Open()
  Dim FCol As Long, NumSem As Integer
  ' Première colonne à masquer ou pas
  FCol = 8
  ' Quelle semaine sommes-nous
  NumSem = Format(Now(), "ww", vbMonday, vbFirstFourDays)
  ' Masquer les colonnes, entre la 1ère et la semaine X
  ActiveSheet.Range(Cells(1, FCol), Cells(1, FCol + NumSem - 2)).EntireColumn.Hidden = True
End Sub

A+

Bonjour à tous

Une variante.

Bye !

Merci de vos réponses.

c'a fonctionne correctement.

Merci à tous mes deux.