The code is nothing fancy, just testing whether a certain filename exists
within a filepathname. (What I'm actually using it for is to confirm that a
user has saved a template file under another name; if not, it throws him
out.) Like this:

If Find("OriginalFile.xls", "c:\Documents And
Settings\Stuff\SavedAsFile.xls", 1) Then
MsgBox ("Naughty, naughty, same filename -- you'e outa here!")
End If

Compiling or running this, though, gives a Compile error: Sub or Function
not defined. Exact same if I use Search instead of Find.



"SixSigmaGuy" wrote:

It would help if you provided some source code so we could see what you are
doing.

I use "Find" quite a bit in my code.

Are you using it as a member of a range object? Are you setting a range
object to the return value?

The following code works for me. It finds a cell in column 2 that contains
the text "Six Sigma.":

Sub TestFind()
Dim r As Excel.Range

Set r = Worksheets("Sheet1").Columns(2).Find("Six Sigma", , xlValues,
xlPart)
End Sub

"LarryP" wrote in message
...
I'm trying to write VBA using either Search or Find to determine if string
A
exists in string B, and the debugger insists it doesn't recognize either,
although Help alleges they are available to VBA. Anyone have an idea why
the
error? No missing references.... (Excel 2003 SP3/Windows XP)