Learning how to use 'Cells.Find()'

  • Thread starter Thread starter Wellie
  • Start date Start date
W

Wellie

I'm learning how to use the "Cells.Find()" VBA function. I have th
following simply routine:
sub Test()
Call FindStr("Mystring")
end sub

sub FindStr(strx as String)
Cells.Find(What:=strx).activate
end sub

When I run the Test() sub. I received the following error:

Run-time error '91':
Object variable or With Block variable not set

Can someone please
1 - tell me what am I missing here to get this simply routine workin
?
2 - where can I find more documentation on this Cells.Find() functio
?

Thanks in advance for any assistance
 
sub Test()
Dim rng as Range
set rng = FindStr("Mystring")
if not rng is nothing then
rng.Select
else
msgbox "Mystring not found"
End if
end sub

sub FindStr(strx as String) as Range
set FindStr = Cells.Find(What:=strx)
end sub

Find is fully documented in excel vba help.
It basically is the same as Edit=>find done manually.
 
Back
Top