条件格式错误
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
我正在尝试编写一些 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