help on using find method 1

[Luis939]

Basically all I want to do is use the Find method to search for a string of text. However, if excel doesnt find the string it gives you a visual basic error sayin runtime "error 91 object variable or with block variable not set", so im trying to avoid this error. I just want excel to not do anything if it can't find the string. I tried with the following code but it didnt work, thanks

Cells.Find(what:="text", after:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate

If ActiveCell.Value <> &quot;text&quot; Then End

 

[RobBroekhuis]

The find method doesn't change the activecell. You need to assign your .find call to a range variable, e.g.

dim cell as range
...
set cell=cells.find ....

if cell is Nothing then
msgbox &quot;Not found!&quot;
else
do your stuff, e.g.
cell.font.color=vbRed
end if
Rob