Cacher colonne dont jours fériés

Bonsoir à tous,

A Iliade du code ci-dessous, je parcours mon tableau et je cache les colonnes qui sont des jours ouvrés pour ne garder en visuel que les jours de week-ends.

Sub Bouton1_Cliquer()
 
'On bloque le rafraichissement de l'écran
Application.ScreenUpdating = False
Dim depart As Long
'On cherche le numéro de la dernière colonne utilisée
depart = Cells(2, Cells.Columns.Count).End(xlToLeft).Column
   For i = 7 To depart
    If Cells(32, i).Value < 5 Then Columns(i).Hidden = True
    Next i
 
End Sub

Comment est-ce que je pourrai faire pour ajouter le fait que je souhaite que mes colonnes avec date qui représentent des jours fériés (j’ai un tableau dans un autre onglet où toutes les dates des jours fériés sont inscrites) soient également visibles.

Si je comprends bien la programmation (désolé je suis vraiment novice), mon code devrait dire cela:

Pour chaque celulle comprises entre la plage M3:NG3, vérifier si la date inscrite fait partie des dates inscrite dans la plage B3:B12, si c’est le cas, passe à la cellule suivante et si ce n’est pas le cas, vérifie si la date est un jour week-end et si c’est le cas passe à la cellule suivante sinon cache la colonne

Merci d’avance pour votre aide et excellente soirée à tous.