It is different because the worksheet function errors out if the value is
not found, and you are not handling an error. It can be done, like so

Dim tmp As Long

On Error Resume Next
tmp = WorksheetFunction.Find(third, y)
On Error GoTo 0

Result = tmp < 0

but it is far more efficient to use a VBA function in VBA, rather than
calling out to Excel.

--

HTH

Bob

"Schizoid Man" wrote in message
...
"Bob Phillips" wrote in message
...
Use Instr

Result = InStr(y, third) 0


--

HTH

Bob

Hi Bob,

That certainly does help - your solution worked like a charm, though I'm
not sure why. How is it different from what I had originally written down?

Thx.