VBA录制的代码如下，怎么转换为 VFP：
*    Range("N2").Select
*    Selection.FormatConditions.Add Type:=xlExpression, Formula1:="=$N$2<>0"
*    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
*    With Selection.FormatConditions(1).Interior
*        .PatternColorIndex = xlAutomatic
*        .Color = 10498160
*        .TintAndShade = 0
*    End With
*    Selection.FormatConditions(1).StopIfTrue = False

自己摸索出来了：
with .Range("N2")
    .FormatConditions.Add(2, 5, "=$N$2<>0")
    .FormatConditions(1).Interior.ColorIndex = 6
endwith