oStory.HighlightColorIndex = wdBrightGreen oStory.Select Application.PrintOut Range:=wdPrintCurrentPage