How to Show File Print Setup Dialog Box using Word VBA

The following code displays the Print Setup Dialog

Sub Show_PntSetup()

With Dialogs(wdDialogFilePrintSetup)
.Show
End With

End Sub.