确定一个string是否在一个string内

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

我的代码正在search一个列。 在每个循环中,我想确定该单元格是否包含特定的短语。

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

不知道如何从单元格中存在的较长的句子中挑出那个短语。 谢谢!

尝试这个

  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