条件格式和vba

Question

在宏中我使用以下代码：

With Range("T2:X31")
    .FormatConditions.Delete
    .FormatConditions.Add Type:=xlExpression, Formula1:="=$R2=0"
    .FormatConditions.Add Type:=xlExpression, Formula1:="=$AE2"
    .FormatConditions.Add Type:=xlExpression, Formula1:="=$AF2"
    .FormatConditions(1).Interior.Color = RGB(216, 216, 216)
    .FormatConditions(1).Font.Color = RGB(216, 216, 216)
    .FormatConditions(2).Interior.Color = RGB(255, 40, 40)
    .FormatConditions(2).Font.Color = RGB(255, 255, 255)
    .FormatConditions(3).Interior.Color = RGB(255, 128, 0)
    .FormatConditions(3).Font.Color = RGB(0, 0, 0)
End With

当我检查条件格式规则时，我想要在excel中获得（手动输入）：

我得到的是

除了行（1046053而不是2行）之外一切正常。我应该如何输入单元格引用以获得正确的公式。

Answer 1

尝试在设置条件之前选择A2：

Range("A2").Select

我从未使用过VBA，但我怀疑条件格式中的公式与当前选择有关。

我认为选择实际设定条件的范围会更好，就像从界面那样做：

Range("T2:X31").Select