VBA ændre celle-range gradient

Prøver at give min range en gradient, det er den som via interfacet hedder "Grøn/gul/rød farveskala" via kode.

Jeg er meget ny inden for VBA, men har brugt c# i længere tid - så jeg har kunne klare mig indtil nu :)

Har prøvet at optage macro, og ændre Selection til myRange, men det virker ikke efter hensigten.
Her er den kode macroen spytter ud:

Selection.FormatConditions.AddColorScale ColorScaleType:=3    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
Selection.FormatConditions(1).ColorScaleCriteria(1).Type = _
        xlConditionValueLowestValue
With Selection.FormatConditions(1).ColorScaleCriteria(1).FormatColor
.Color = 7039480
.TintAndShade = 0
End With
Selection.FormatConditions(1).ColorScaleCriteria(2).Type = _
        xlConditionValuePercentile
Selection.FormatConditions(1).ColorScaleCriteria(2).Value = 50
With Selection.FormatConditions(1).ColorScaleCriteria(2).FormatColor
.Color = 8711167
.TintAndShade = 0
End With
Selection.FormatConditions(1).ColorScaleCriteria(3).Type = _
        xlConditionValueHighestValue
With Selection.FormatConditions(1).ColorScaleCriteria(3).FormatColor
.Color = 8109667
.TintAndShade = 0
End With

Er der en der sidder med løsningen?

Kal