条件格式错误

Conditional formatting error

我正在尝试编写一些 vba 代码,将条件格式添加到 sheet,但是我将 运行 保留在应用程序定义的错误中。以下是我的代码

With sheet1.Range("C2:C")
  .FormatConditions.Delete
  .FormatConditions.Add Type:=xlExpression, Formula1:="=NOT(ISBLANK($B2))"
  .FormatConditions(1).Interior.ColorIndex = RGB(225, 242, 255)
End With

关于为什么会发生这种情况有什么建议吗?

谢谢!

Range("C2:C") 不是有效范围,请将其固定,或以下使其动态:

然后将您的 ColorIndex 更改为 Color:

With Range("C2:C" & Cells(Rows.Count, "C").End(xlUp).Row)
  .FormatConditions.Delete
  .FormatConditions.Add Type:=xlExpression, Formula1:="=NOT(ISBLANK($B2))"
  .FormatConditions(1).Interior.Color = RGB(225, 242, 255)
End With