Couleur plage de cellules selon extrait de texte

Bonjour,

J'essaie de réutiliser une macro mais je crois que j'ai raté quelque chose.

Dans la colonne C de mon tableau, j'ai parfois le terme "...Annulé le ....".
J'ai besoin de mettre en couleur la plage de données de la ligne correspondant au terme "Annulé" trouvé dans la colonne C.

Exemple : s'il trouve le mot Annulé en C10, il applique couleur de fond à la plage (A10:J10). Il faut répéter cette action jusqu'à toutes les valeurs trouvées de la colonne C soient trouvées.
En effectuant des recherches, j'ai constaté qu'il fallait mettre xlPart et non xlWhole dans FIND (pour une partie de texte et non l'intégralité)
La macro d'origine fonctionnait pour une autre action (merci à vous d'ailleurs) mais je n'ai pas réussi à l'adapter pour autre chose. Je pensais avoir trouvé...
Merci à qui voudra bien m'aider

Si joint le fichier :
https://we.tl/t-rvPFnTiv1W

Option Explicit

Sub Cherche_Couleur()
  Dim Trouve As Range, PlageDeRecherche As Range, Plage As Range
  Dim Valeur_Cherchee As String
  
  Valeur_Cherchee = "Annulé"
  Set PlageDeRecherche = ActiveSheet.Columns(3)
  Set Trouve = PlageDeRecherche.Cells.Find(what:=Valeur_Cherchee, LookAt:=xlPart)

  If Not Trouve Is Nothing Then
    On Error GoTo Fin 'si aucune cellule vide évite l'erreur 1004 : pas de cellules correspondantes
    Set Plage = Range("C1:C" & Trouve.Row).SpecialCells(xlCellTypeBlanks)
    Plage.Select.Interior.ThemeColor = xlThemeColorAccent2
    Plage.Select.Interior.TintAndShade = 0.799981688894314

  Else
    MsgBox "Pas trouvé " & Valeur_Cherchee
  End If
  
Fin:

End Sub