See below for an example. But, what exactly do you want to do? If you want to control printing, you can do that without showing the user a dialog. On the other hand, if you want to give the user limited choices, you can use your own custom dialog for that and then execute the print method.
Option Explicit
Sub test()
Dim MyDialog As Dialog
Dim Request As Integer
Set MyDialog = Dialogs(wdDialogFilePrint)
MyDialog.NumCopies = 3
MyDialog.Pages = "1-3,6-10"
Request = MyDialog.Display '(Use .Show to allow execute)
If Request = -1 Then
MsgBox ("User said print"
Else
MsgBox ("User said Cancel"
End If
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.