Modification de la couleur de police d'une cellule change lorsque modification

Bonjour
j'ai une zone dans un tableau excel. j'aimerai que lorsque je modifie une couleur d'une phrase dans une cellule X (non définie dans cette zone) la phrase entière change de couleur.
j'ai essayé ce code sans succès :

Private Sub Worksheet_Activate()
valeur = Range("C30:av52")

End Sub

Private Sub Worksheet_Calculate()
If Range("c30:av52") <> valeur Then
Range("c30:av52").Font.ColorIndex = 5
valeur = Range("c30:av52")
End If
End Sub

quelqu'un a t il une idée svp ?

merci par avance