Open Search and replace dialog

  • Thread starter Thread starter jkrons
  • Start date Start date
J

jkrons

Is the a way to open the Search and replay dialog?

Application.Dialogs(xlDialogSearch).Show

opens the Filesearch task, and I haven't been able to locate any
xldialog keyword for the search and replace.

Jan
 
I don't think it's available, does not appear to show in the Built-In Dialog
Box Argument Lists

However, see if one of these two approaches helps you.


Sub aaa()

Application.Dialogs(xlDialogFormulaReplace).Show

End Sub

Sub bbb()

Application.CommandBars.FindControl(ID:=1849).Execute
Application.CommandBars("Edit").Controls("Find...").Execute

End Sub
 
Unfortunately the first one locks finds nothingm, but locks Excel.
The second fails in line 2

Application.CommandBars("Edit").Controls("Find...").Execute

with an runt-time error 5: Invalid procedure call or agument.

Jan
 
I'm running XP / 2003 & both worked fine for me.
I am guessing by your post that you are running different platform? if this
is so, sorry but not able to assist you any further.
 
Back
Top