In your code, before the Find statement, insert:

fwhat = inputbox("String to find")

and then use variable fwhat as the What argument in find.

HTH,
Nikos
-----Original Message-----
I wan to display the find dialog box for text strings
within my work sheet in my macro,or can i link a message
box with the "what" in find
.