vba条件格式选择规则

Question

在 Excel 中，您可以轻松地使用选择规则栏下的条件格式>新规则>，您可以从 6 种可用模式中选择一种模式。但在 vba 中，您只能使用 Select 包含模式的单元格。我需要将其更改为第 6 个，选择自定义条件。有没有可能。也许问题是因为我使用了百分比？

我的代码很简单；

With ThisWorkBook.Worksheets(1).Range("A1").FormatConditions.Add(xlCellValue,xlGreaterEqual, "=$B3>=100%")
.AppliesTo=Range("A1")
.StopIfTrue=False
    With .Font
    .ColorIndex=4
    End With
End With

Answer 1

几个问题：

• 是FormatConditions.Add（您的问题可能有错别字）
• xlGreaterThan 不是有效选项。可能你的意思是xlGreaterEqual。有关选项列表，请参阅 docs。
• 100% 等同于 1。

Dim cond As FormatCondition
Set cond = ThisWorkbook.ActiveSheet.Range("A3").FormatConditions.Add(xlCellValue, xlGreaterEqual, 1)

编辑：

如果要使用表达式，那么：

With ThisWorkBook.Worksheets(1).Range("A1").FormatConditions.Add(Type:=xlExpression, Formula1:="=$B1>=1")
    .AppliesTo=Range("A1")
    .StopIfTrue=False
     With .Font
        .ColorIndex=4
     End With
End With