#DEFINE wdPrintAllDocument 0 #DEFINE wdPrintSelection 1 #DEFINE wdPrintCurrentPage 2 #DEFINE wdPrintFromTo 3 #DEFINE wdPrintRangeOfPages 4 llPrintBackGround = .f. && parm 1 lnPrintRangeType = wdPrintFromTo && parm 3 lcOutPutFileName = "" && parm 4 lcFrom = "1" && parm 5 lcTo = "1" && parm 6 lnCopies = "1" && parm 8 lcPageRange = "" && parm 9 if parm 3 is wdPrintRangeOfPages llPrintToFile = .f. && parm 11 only if lcOutPutFileName is used oWord.oDocument.PrintOut(llPrintBackGround, , lnPrintRangeType, , lcFrom, lcTo, , lnCopies)To print the entire doc, change wdPrintFromTo to wdPrintAllDocument, and remove the 1 from the lcFrom and lcTo variables.