使用VBA的条件格式 - 对于精确匹配的单词

Question

您在以下页面上评论了 使用VBA进行条件格式化 -

Conditional Formatting using VBA

  

你不需要循环。您只需添加一个新的FormatCondition即可   你的范围对象。

lLow = 90000
lHigh = 100000

Set rng = Range("K8:K207")
rng.FormatConditions.Delete  ' delete any pre-existing formatting

' add greater than condition
With rng.FormatConditions.Add(Type:=xlCellValue, Operator:=xlGreater, Formula1:="=" & lHigh)
     .Interior.Color = rgbLimeGreen
End With

' add middle condition
With rng.FormatConditions.Add(Type:=xlCellValue, Operator:=xlBetween, Formula1:="=" & lLow, Formula2:="=" & lHigh)
   .Interior.Color = rgbGold
End With

' add less than condition
With rng.FormatConditions.Add(Type:=xlCellValue, Operator:=xlLess, Formula1:="=" & lLow)
   .Interior.Color = rgbRed
End With

我想知道如果您需要在单元格中输入的完全匹配应该是什么？让我们说这是将填充的例子：ALPHA POSITION（2） - 1900Mhz。

怎么写？是这样的吗？

Operator:=xlEqual, Formula1:="=" ALPHA POSITION (2) - 1900Mhz)

Answer 1

您需要添加“ char：

Operator:=xlEqual, Formula1:="=""ALPHA POSITION (2) - 1900Mhz""")

要在VBA中接受，您需要插入双“”，否则VBA会考虑单个字符串完成...