Dim oCell As Range

Set oCell = Cells.Find(What:="actualaxis1", _
After:=ActiveCell, _
LookIn:=xlFormulas, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
If Not oCell Is Nothing Then
'do your stuff
Else
Msgbox "Not found"
End If

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Bryan Kelly" wrote in message
om...
I need to write some macros and to do so I must understand some of the
Excel
functions. For example, when I record a macro to find something, I edit
the
macro and find this:

Cells.Find(What:="actualaxis1", After:=ActiveCell, LookIn:=xlFormulas,
_
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Activate

Question: After running the macro, I opened the "Locals Window" and began
stepping through the macro to see what it does. I quickly received runtime
error 91: To make this short, that just means that my search object was
not
found. (Maybe, I and done a replace and the original search text was
indeed
missing. To throw a run time error when a search fails is just plain
absurd.
A not found condition should be an expected result, not a run time error.
What should I do to detect a not found condition and eliminate a run time
error?

(btw, when I try help, it tells me it cannot find VEENLR3.HLP. Its not
on
my Exel disk so I don't know how to resolve this but I supose that is
fodder
for another question.)

--
Bryan Kelly
Time is the medium we use to express out priorities.




--
Bryan Kelly
Time is the medium we use to express out priorities.