使用 VBA 中的 FormatConditions 检查值 "false" 是否在范围内

Question

小伙伴们，我想问个问题，我一直在搜索如何在 VBA 中使用 formatConditions，但没有找到我想要的。

我知道如何在 excel 中正常制定新规则，但我必须通过 VBA 制定新规则。

我将尝试通过对我的代码的评论来解释这一点：

 With Range(Cells(5, 11), Cells(comparisonlastrow, 11))
    .FormatConditions.Delete
    'Add formatcondition rule saying that if a cell in this range contains "false", this cell goes vbRed 
    '.
End With
Next

Answer 1

这是使用 VBA 添加条件格式的方法。您可以尝试使用示例代码来获得所需的输出。

FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
        Formula1:="=FALSE"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13551615
        .TintAndShade = 0
    End With

第一次编辑：

我假设您想对特定范围应用条件格式（某种循环），这就是您可以做的

Sub Cformatting()

Dim i

For i = 1 To 1000
    Range("E" & i).Select
    Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlEqual, _
        Formula1:="=FALSE"
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    With Selection.FormatConditions(1).Font
        .Color = -16383844
        .TintAndShade = 0
    End With
    With Selection.FormatConditions(1).Interior
        .PatternColorIndex = xlAutomatic
        .Color = 13551615
        .TintAndShade = 0
    End With
    Selection.FormatConditions(1).StopIfTrue = False
    Next

End Sub

使用 VBA 中的 FormatConditions 检查值 "false" 是否在范围内

Check if the value "false" is in a range using FormatConditions in VBA

excel

vba

conditional-formatting