Application.Dialogs (Word)

Returns a Dialogs collection that represents all the built-in dialog boxes in Word.

For information about returning a single member of a collection, see Returning an object from a collection. For a list of built-in dialog boxes, see the WdWordDialog enumeration.

Dim dlgFind As Dialog 
 
Set dlgFind = Dialogs(wdDialogEditFind) 
 
With dlgFind 
 .Find = "Hello" 
 .Show 
End With