确定字符串是否在字符串中

Question

寻找确定单元格/字符串中是否存在关键字的最佳方法。

我的代码正在搜索专栏。在每个循环中，我想确定该单元格是否包含某个短语。

For x = 1 to 1000
If range("a" & x) contains " CERTAIN PHRASE " then b = b + 1
Next x

不确定如何从单元格中存在的较长句子中挑出该短语。谢谢！

Answer 1

试试这个

    For x = 1 To 1000
        Set c = Range("A" & x).Find("certain phrase", LookIn:=xlValues)
        If Not c Is Nothing Then b = b + 1
    Next