Modification d'un code de macro


#1

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


#2

Bonjour,

Sans voir plus par manque de classeur modèle, la ligne en cause a 2 parenthèses manquantes

If Month(Cells(6, Num_Col)) > LastDate Then

fermé automatiquement #3

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.