Erreur d'exécution '5'

Bonsoir, j'aimerais créer un programme VBA assez simple, mais une erreur lors du lancement du programme apparaît ("Erreur d'exécution '5' : Argument ou appel de procédure incorrect"). Pourriez-vous m'aider ?
Voici mon code :

ligne = ActiveCell.Row

Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
"=Cells(ligne, 12)>Cells(ligne, 10)"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 65535
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False

Merci d'avance pour votre aide.