Bouton macro mise en forme conditionnelle

Bonjour à tous, je suis nouveau sur ce forum^^

En fait j'ai une série d'exercices à réaliser, et donc une série de problèmes rencontrés!

Mon premier problème est en fait la réalisation d'un bouton de commande, sur lequel est lié l'execution d'une macro. Cette macro doit en fait mettre en évidence toutes les dates d'une plage fixe dont le mois est égal au mois courant.

C'est cette dernière partie qui me cause problème, n'étant pas habitué avec le vb j'espère avoir un peu d'aide ou d'explications

A bientot

Bonjour, un exemple de code, où tu testes toutes les cellules de A1 à A16.

si le mois de la cellule testée est égal au mois courant (Date te donne la date du jour),

alors la cellule se met en rouge (Interior.Color.Index = 3), sinon, elle n'a aucun remplissage (xlNone)

La fonction IIf permet de tester une condition, et renvoie la 1 ère valeur si la condition est vraie, et la 2 ème le cas échéant (regarde l'aide F1)

Sub du_mois()
For Each cel In Range("A1:A16")
    cel.Interior.ColorIndex = IIf(Month(cel) = Month(Date), 3, xlNone)
Next cel
End Sub

Ouch yen a qui sont balèzes lol^^

Un très grand merci ça marche direct!!

A bientot