Боб задается вопросом, есть ли простой способ переключиться с обычного порядка печати на обратный и обратно. Он понимает, что это можно изменить в диалоговом окне «Печать», но вместо этого ищет команду, которую можно разместить на панели инструментов.

Самый простой способ реализовать подход к макросам — создать два макроса. Один используется для установки обычного порядка печати, а другой — для установки обратного порядка печати:

Sub ForwardPrint()

Options.PrintReverse = False End Sub
Sub ReversePrint()

Options.PrintReverse = True End Sub

Макросы очень и очень простые и могут быть назначены отдельным кнопкам панели инструментов. Если вы предпочитаете реализовать решение, использующее один макрос (поэтому вам нужно использовать только одну кнопку на панели инструментов), то следующее может работать нормально:

Sub SwapPrint()

With Options         If .PrintReverse = True Then             .PrintReverse = False             MsgBox ("Now printing in normal order")

Else             .PrintReverse = True             MsgBox ("Now printing in reverse order")

End If     End With End Sub

Этот подход переключает свойство PrintReverse, поэтому он переключается между нормальным и обратным порядком. Макрос также отображает диалоговое окно, в котором указывается текущий порядок печати.

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (590) относится к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:

link: / wordribbon-Easily_Changing_Print_Order [Простое изменение порядка печати].