find单元格地址感谢单元格的文本值

我正在尝试在vba中查找包含单词“ok”的单元格行，这是我的代码：

Dim findValue As Long findValue = Sheets("STOCKS").Range("E:E").Find("ok").Row 

问题在于包含单词“ok”的单元格，例如E5，是通过将另一个单元格的值replace为另一个表格的公式来填充的。 所以我得到以下错误：

 execution error 91 : object variable or bloc variable with not defined (I have translated the message from french to english) 

我认为这是因为单元格包含公式而不是真实的价值。

Answer 1

如果你真的认为公式是你可以添加的问题

 lookin:=xlValues 

作为您的查找function的参数，以便它读取：

 findValue = Sheets("STOCKS").Range("E:E").Find("ok", lookin:=xlValues).Row 

如果没有find您要查找的值，您也会得到这个错误。 你可以用这个代码检查这个。

 Dim findValue As Long Dim r As Range Set r = Sheets("STOCKS").Range("E:E").Find("ok", LookIn:=xlValues) If r Is Nothing Then MsgBox "Not found" findvalue = -1 Else findvalue = r.Row End If