expression.PrintDraft
expression Required. An expression that returns an Options object.
Remarks
Not all printers support draft printing.
Example
This example sets Word to use draft printing and then prints the active document.
Options.PrintDraft = True
ActiveDocument.PrintOut
This example returns the current status of the Draft output option on the Print tab in the Options dialog box (Tools menu).
temp = Options.PrintDraft