Colorier une cellule par macro
z
Bonjour à tout le forum.
J'ai une cellule (A1) qui contient une date.
Par le biais d'une macro, je souhaite colorier la cellule (A2) en rouge si la cellule (A1) égale à la date du jour.
Ce que j'ai réalisé, malheureusement sans aucun résultat :
if cells(1,1)=now() then
cells(1,2).interior.color=255
end if
Merci pour toute aide de votre part
Bonjour,
Teste comme ceci
If Cells(1, 1) = Date Then
Cells(2, 1).Interior.Color = RGB(255, 0, 0)
Else
Cells(2, 1).Interior.Color = RGB(255, 255, 255)
End IfEn utilisant Now tu évoques la fonction MAINTENANT() d'Excel qui donne la date et l'heure
Alors que Date est l'équivalent de AUJOURDHUI()
Salut zozo64,
ainsi, peut-être...
If CDate(Range("A1").Value) = Date Then Range("A2").Interior.ColorIndex = 3A+