Masquer colonnes selon critère ligne 2

Bonjour,

J'ai un planning Excel ou, par formules conditionnelles, j'ai fait ressortir les samedi et dimanche selon les éléments ci-dessous:

With Selection.Interior

.Pattern = xlSolid

.PatternColorIndex = xlAutomatic

.ThemeColor = xlThemeColorDark1

.TintAndShade = -4.99893185216834E-02

.PatternTintAndShade = 0

End With

With Selection.Interior

.Pattern = xlGray16

.PatternColorIndex = xlAutomatic

.ColorIndex = xlAutomatic

.TintAndShade = 0

.PatternTintAndShade = 0

End With

J'ai également fait ressortir les jours fériés selon les éléments ci-dessous:

With Selection.Interior

.Pattern = xlSolid

.PatternColorIndex = xlAutomatic

.ThemeColor = xlThemeColorAccent6

.TintAndShade = 0.599993896298105

.PatternTintAndShade = 0

End With

Je n'arrive pas à transcrire en VBA pour masquer les ces colonnes

Votre aide me serait d'un grand secours.

J'ai trouvé ce morceau de code mais je n'arrive pas à l'adapter.

Merci pour votre aide

@+

Robert

Bonjour

Si je comprends bien ta demande, tu veux un tableau avec seulement les jours travaillés

Si enI2 tu changes ta formule par:

=SERIE.JOUR.OUVRE($H$3;COLONNE()-8;JoursFériés)

et que tu incrémentes vers la droite, ta ligne 2 n'affichera plus ni les Week-ends, ni tes jours Fériés et ton code vba devient inutile.

Exemple sur le fichier joint

Cordialement

Bonjour Amadeus,

Merci pour ta réponse qui est excellente. J'adopte.

Un GRAND MERCI pour ton aide

@+

Robert

Rechercher des sujets similaires à "masquer colonnes critere ligne"