Question

是否可以在Excel中使用VBA添加使用公式的条件格式设置规则：=COUNTIF(A1:B1,"*9.65*")？

Answer 1

VBA的速度更快，你可以手动完成，仅此而已（好吧，它做了更多的事情，但这只适用于专家:)）。

你的问题的答案是肯定的，如果你可以手动完成，否则没有。

您尝试手动执行所需的格式设置，选择范围并单击任何格式设置按钮或选择每个单元格并逐个手动应用它的颜色。在录制宏时执行此操作，如果您可以手动执行此操作，则可以使用VBA功能为您快速完成。

录制的宏很可能不会对您有用，但对于您真正有效的宏来说将是一个很好的起点。

Answer 2

正如其他人所指出的那样，您只需记录一个宏即可获得所需的近似代码。

' For this example, the cell references are hard coded. Edit as required.
Range("D1:D4").Select
Selection.FormatConditions.Add Type:=xlExpression, Formula1:= _
    "=COUNTIF(A1:B1,""9.65"")"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Interior
    ' This is the style that you apply to each cell.
    .PatternColorIndex = xlAutomatic
    .ThemeColor = xlThemeColorAccent6
    .TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False

使用COUNTIF进行条件格式化

2 个答案: