macro to open find dialog box ready to search in values in workbook

[Stuartzz]

Hi there
I would like a macro that results in the find and replace dialog box being open with the following settings/characteristics:
-ready to search in “workbook”
-ready to search in “values”
-the text string “unfinished:*” in the “Find” field
-the cursor placed immediately after the aforementioned text string (if possible)

I don’t want the macro to execute a search, I want it to be ready for someone to type their name after the text string “unfinished:”.

Thanks for any assistance

 

[Stuartzz]

Hi there
I would like a macro that results in the find and replace dialog box being open with the following settings/characteristics:
-ready to search in workbook
-ready to search in values
-the text string unfinished: in the Find field, with the cursor placed immediately after the aforementioned text string

I don’t want the macro to execute a search, I want it to be ready for someone to type their name after the text string unfinished:

Thanks for your assistance 

 

[Stuartzz]

Hi there
I was thinking of a different approach that may be easier.

First have a macro (let's say macro 1) that brings up an input box that already has a "-" in the input field, and prompts the user with something like "enter your name after the "-" into the input field below and click OK". Then they follow the prompt by entering their name after the "-" and then when they click "OK" button in the input box, it launches another macro (macro 2) that contains code like below to execute a search in values in the whole workbook. The difference is that instead of executing a search with "-John", it would execute a search for the input from the input box in macro 1.
Also, after it executes the search, it should reopen the Excel find dialog box ready for someone to click "find next".

So I don't know how to macro 1, and I would need to know how to change my sample code for macro 2 so that it executes a search for the text entered into the input box during macro 1, and then reopens the "find" dialog box which will be ready for someone to click "find next" so it will search for the next instance of the same text in values in the whole workbook.

Could this work?

Any help would be great, thanks.

Stu

    Sheets("plan-master").Select
    Cells.Find(What:="-John", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
        xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate