(495) 925-0049, ITShop интернет-магазин 229-0436, Учебный Центр 925-0049
  Главная страница Карта сайта Контакты
Поиск
Вход
Регистрация
Рассылки сайта
 
 
 
 
 

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

Источник: wordexpert
Антон Кокин

Нередко пользователи жалуются на отсутствие в диалоговом окне Параметры страницы редактора 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. Таким образом, один макрос - одна кнопка - два режима.

Ссылки по теме


 Распечатать »
 Правила публикации »
  Написать редактору 
 Рекомендовать » Дата публикации: 27.08.2007 
 

Магазин программного обеспечения   WWW.ITSHOP.RU
Microsoft Office 365 Бизнес. Подписка на 1 рабочее место на 1 год
Microsoft Office для дома и учебы 2019 (лицензия ESD)
Microsoft 365 Business Basic (corporate)
Microsoft Windows Professional 10, Электронный ключ
Microsoft 365 Business Standard (corporate)
 
Другие предложения...
 
Курсы обучения   WWW.ITSHOP.RU
 
Другие предложения...
 
Магазин сертификационных экзаменов   WWW.ITSHOP.RU
 
Другие предложения...
 
3D Принтеры | 3D Печать   WWW.ITSHOP.RU
 
Другие предложения...
 
Новости по теме
 
Рассылки Subscribe.ru
Информационные технологии: CASE, RAD, ERP, OLAP
Безопасность компьютерных сетей и защита информации
Новости ITShop.ru - ПО, книги, документация, курсы обучения
Программирование на Microsoft Access
CASE-технологии
Программирование на Visual С++
Новые программы для Windows
 
Статьи по теме
 
Новинки каталога Download
 
Исходники
 
Документация
 
 



    
rambler's top100 Rambler's Top100