Mettre le texte en rouge

Bonjour à tous,

je cherche à mettre le texte en rouge lorsqu'il apparaît (en exécutant la macro vous comprendrez mieux). Merci d'avance

Bonjour

..../...

ActiveCell.FormulaR1C1 = "NOTE = 8/20"
ActiveCell.Font.ColorIndex = 3

Cordialement

Bonjour,

merci pour ta réponse Amadeus