Word Макрос: Перед печатью сделать без выделения, после печати вернуть обратно

Автор Ципихович Эндрю, 26 января 2017, 20:29

Ципихович Эндрю

Здравствуйте. В файле есть текст, выделенный бирюзовым цветом. Как не печатать цвет?
Цветом я выделил так: вкладка "Главная" - группа "Шрифт" - Цвет выделения текста.
Приложил файл с примером.

[вложение удалено администратором]

Администратор

Sub Макрос()
    ActiveWindow.View.ShowHighlight = False
    ActiveDocument.PrintOut Background:=False, Range:=wdPrintAllDocument, Item:=wdPrintDocumentContent, Copies:=1, _
        PageType:=wdPrintAllPages, PrintToFile:=False, Collate:=True, ManualDuplexPrint:=False, PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
    ActiveWindow.View.ShowHighlight = True
End Sub