Prova con
e invece di dire non funziona spiega cosa succedecodice:Myw.ActiveDocument.PrintOut FileName:="", Range:=wdPrintRangeOfPages, item:= _ wdPrintDocumentContent, Copies:=1, Pages:="1-2", PageType:= _ wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _ PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _ PrintZoomPaperHeight:=0 While Myw.BackgroundPrintingStatus
(esempio: stampa tutto il documento)