Dialogs Property Example

This example displays the built-in Find dialog box, with "Hello" in the Find What box.

Set dlg = Dialogs(wdDialogEditFind)
With dlg
    .Find = "Hello"
    .Show
End With

This example displays the built-in Open dialog box showing all file types.

With Dialogs(wdDialogFileOpen)
    .Name = "*.*"
    .Show
End With

This example prints the active document, using the settings from the Print dialog box.

Dialogs(wdDialogFilePrint).Execute