Set the contents of the File Name text box in the Save As dialog box in Word and then display the dialog box

 
Sub show()
    With Dialogs(wdDialogFileSaveAs)
        .Name = "Yellow Paint Primer"
        .show
    End With
End Sub

1.	Returning the Button the User Chose in a Dialog Box
2.	cancel a procedure if the user clicked the Cancel button in a dialog box:
3.	Specifying a Timeout for a Dialog Box
4.	Display one of Excel's built-in dialog boxes and let the user make the choices: by using the Application object's Dialogs property.
5.	To display Excel's Open dialog box
6.	Using an Application's Built-in Dialog Boxes from VBA: wdDialogFileOpen

Set the contents of the File Name text box in the Save As dialog box in Word and then display the dialog box : Dialogs « Application « VBA / Excel / Access / Word