Bonjour !
J'ai un probleme que je n'arrive pas à resoudre toute seule.
J'ai un calendrier qui s'affiche à partir de la ligne C15 et qui s'ettend sur la ligne 15. J'ai une date de début de tache(ddd) une date de fin(ddf).
Je voudrai colorier les cases de la ligne suivante à partir de D16 lorsque ces dates sont comprises entre celles de début et de fin.
J'ai essayé le code suivant :
Cells(15, 3).Select
If ActiveCell.Value <= ddd Then
Do While ActiveCell.Value <= ddf
ActiveCell.Offset(1, 0).InteriorColor = 15
ActiveCell.Offset(0, 1).Select
Loop
End If
Mais ca ne marche pas et je ne vois vraiment pas pourquoi.
Pourriez vous m'aider ?
Merci bcp
J'ai un probleme que je n'arrive pas à resoudre toute seule.
J'ai un calendrier qui s'affiche à partir de la ligne C15 et qui s'ettend sur la ligne 15. J'ai une date de début de tache(ddd) une date de fin(ddf).
Je voudrai colorier les cases de la ligne suivante à partir de D16 lorsque ces dates sont comprises entre celles de début et de fin.
J'ai essayé le code suivant :
Cells(15, 3).Select
If ActiveCell.Value <= ddd Then
Do While ActiveCell.Value <= ddf
ActiveCell.Offset(1, 0).InteriorColor = 15
ActiveCell.Offset(0, 1).Select
Loop
End If
Mais ca ne marche pas et je ne vois vraiment pas pourquoi.
Pourriez vous m'aider ?
Merci bcp