mise en forme conditionnelle

Bonjour

Je n'arrive pas à trouver la solution concernant ma mise en forme
conditionnelle.
Je voudrais que la mise en forme de F(i) se face en fonction de G(i)

Sub Macro1()
For i = 7 To 20
Range("F" & i).Select
Selection.FormatConditions.Delete
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual,
Formula1:="=$F$5"
Selection.FormatConditions(1).Font.ColorIndex = 1
Selection.FormatConditions(1).Interior.ColorIndex = 2
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater,
Formula1:="=$G$7"
Selection.FormatConditions(2).Font.ColorIndex = 2
Selection.FormatConditions(2).Interior.ColorIndex = 3
Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlLessEqual,
Formula1:="=$G$7"
Selection.FormatConditions(3).Font.ColorIndex = 2
Selection.FormatConditions(3).Interior.ColorIndex = 10
Next
End Sub


Merci si quelqu'un peu m'aider.