在VBA字符串中搜索特定单词

Question

有一个代码用于搜索VBA字符串中的特定单词。目前我使用INSTR：

tag1 = InStr(1, dish, keyword, vbTextCompare) 

但是面临的挑战是，搜索是比较字符串，而不是单词。 例如如果我作为一个字符串的关键词搜索“蛋” - 茄子比萨，它返回一个true值。

理想情况下，我只想搜索单词“蛋”是否存在于字符串中。有更好的功能可以使用吗？

Answer 1

您还可以使用正则表达式在VBA中实现此目的。

特别注意^和$操作符来强制全字匹配。

所以在你的情况下，像^ Egg $这样的模式应该做你想要的。

在这里看到这方面的一些很好的帮助： How to use Regular Expressions (Regex) in Microsoft Excel both in-cell and loops

Answer 2

InStr是要走的路。为了找出字符串在文本中出现的次数，可以使用这一行代码。这里我用你的例子。

Debug.Print UBound(Split("Eggplant Pizza", "Egg")) 

要使代码不区分大小写，您可以将Option Compare Text放在代码模块的顶部。