Activesheet.Cells.Select
Application.Dialogs(xlDialogFormulaFind).Show


or select a specific range you want to search

Columns(3).Select
Application.Dialogs(xlDialogFormulaFind).Show


--
Regards,
Tom Ogilvy

"Richard Hocking" wrote in
message ...
Hello,

I would like to assign a macro to a button which opens the "find" box, but
stops there. Ie, I want the user to enter the data they wish to find. I've
tried the following code from a previous question about this but although
it
brings up the find box, whatever I search for always returns no results.
(Doing the seach manually works fine).

Application.Dialogs(xlDialogFormulaFind).Show

Am I putting this in the wrong place? Should there be extra code? I'm
using
a Mac, by the way... perhaps there is a way to send the keys "Apple+f"?

Cheers,

Rich.