Microsoft 365 VBA Colorise un doublon dans feuil différente

Hello
Qui peut m'aider sur cette problématique dans une feuil1 colonne G j'ai une référence qui peut etre identique à la feuil 2 en colonne A , si j'ai dans le classeur Feuil2 un doublon en colonne A2 colorise la cellule en G dans feuil1

Mon code ne marche pas si qq un a quelque chose différent qui fonctionne


Sub ColorierCellule()
Dim derniereLigne As Long derniereLigne = Worksheets("Feuil2").Range("A" & Rows.Count).End(xlUp).Row
If WorksheetFunction.CountIf(Worksheets("Feuil2").Range("A2:A" & derniereLigne), _ Worksheets("Feuil1").Range("A2").Value) > 1 Then
Worksheets("Feuil1").Range("G2").Interior.Color = RGB(255, 0, 0)
End If
End Sub