Reply to thread

Message: [QUOTE="Dave Peterson, post: 6410475"] What does not work mean? Is it just that the options are not expanded on the dialog--or that the dialog doesn't show up. I'm guessing that you meant that the dialog appears, but the dialog doesn't open with the Options displayed. I don't know a way of showing that -- maybe you could experiment using the accelerator key (t) and SendKeys. (I wouldn't bother because I don't trust Sendkeys to do what I want.) But I created a test workbook with this procedure in a general module. Option Explicit Sub Auto_open() 'Application.Dialogs(xlDialogFormulaFind).Show 'Application.CommandBars.FindControl(ID:=1849).Execute 'Application.CommandBars.ExecuteMso "FindDialogExcel" End Sub I saved it as book1.xlsm (macro enabled workbook. I uncommented each of the lines one at a time and saved, close and reopened. They all displayed the same dialog as I see when I hit ctrl-f. I didn't test the workbook_open event. [/QUOTE]