with loWord .APPLICATION.Options.PrintBackground = .F. *-- get current active printer lcActivePrinter = .APPLICATION.ActivePrinter *-- set active printer IF VARTYPE(tcPrinter) = 'C' .ActivePrinter = tcPrinter ENDIF .APPLICATION.ActiveDocument.PrintOut() ** More code endwithDon't forget to restore the printer back.