Статьи из блога

Статьи из блога

Макрос переключения между форматами страниц


Надежда, читательница рассылки сайта, пожаловалась на имеющуюся у нее проблему с отсутствием в диалоговом окне Параметры страницы редактора Word 2003 выбора формата страницы А5. Ей приходится вручную устанавливать нужные параметры. Надежда спрашивает, можно ли как-то решить эту проблему.

 

Я предложил воспользоваться небольшим макросом, который позволяет переключаться в редакторе с одного формата А4 на формат А5 и обратно простым щелчком мыши по назначенной для этого макроса кнопке на панели инструментов.

 

Возможно, кому-то этот макрос может также пригодиться. Вот его код:

Sub pageSetupChange()
'Макрос, изменяющий формат страницы с А5 на А4 и обратно.
With ActiveDocument.PageSetup
   If .PaperSize = wdPaperA4 Then
      .PaperSize = wdPaperA5
   Else
      .PaperSize = wdPaperA4
   End If
 End With
Application.ScreenRefresh
End Sub

Если текущий документ имеет формат А4, то макрос меняет формат страницы на А5, а если формат А5 - то меняет на А4. Таким образом, один макрос - одна кнопка - два режима.

]]>twitter.com Google Buzz google.com bobrdobr.ru del.icio.us technorati.com linkstore.ru news2.ru rumarkz.ru memori.ru moemesto.ru]]>

Комментариев: 1

  1. Ирина
    26.07.2010 в 16:21 | #1

    У меня этот макрос не работает. При выполнении отладчик говорит "5889 - свойство papersize на данном принтере не работает"

Оставьте комментарий!

(обязательно)

Number one designer
^ Наверх