Bonsoir,
J’ai créé un calendrier pour toutes les séances que nous avons au cours de l’année. J’ai créé également un menu déroulant pour changer de mois. J’aimerais y associer une macro qui masque les colonnes représentant des jours “non souhaités”.
Voilà ce qui ressemble à ce que je voudrais faire. Mais, il bugue au niveau de la ligne If month et je n’arrive pas à le modifier.
Voici ce que ça donne
Sub Masquer_Jour()
Dim Num_Col As Long
For Num_Col = 32 To 35
’ Compare la valeur du mois de la cellule AD6 Month(Cells(6, Num_Col)
’ avec la valeur du mois sélectionné en a1 Cells(1, 1)
If Month(Cells(6, Num_Col > LastDate Then
Columns(Num_Col).Hidden = True
Else
Columns(Num_Col).Hidden = False
End If
Next
End Sub
Si quelqu’un a une idée de génie pour m’aider, ça serait génial.
Merci d’avance
Bonne soirée