Смена ориентации страниц на одну кнопку

Автор pfantom, 14 апреля 2013, 14:44

0 Пользователи и 1 гость просматривают эту тему.

pfantom

Здравствуйте. Подскажите, можно ли как нить задать смену ориентации страниц на одну кнопку, а не заходить формат-> страница. Т.е я нажимаю на кнопку и с книжной меняется на альбомную, а если стояла альбомная при нажатии кнопки меняется на книжную.
Можно сделать через макросы но их писать не умею. Помогите кто чем может.
вот нашел скрипт но работает только на msoffice

Sub orientPage()
With ActiveDocument.PageSetup
If .Orientation <> wdOrientPortrait Then
.Orientation = wdOrientPortrait
Else
.Orientation = wdOrientLandscape
End If
End With
End Sub

Helen

поскольку формат страницы задаётся через стили страниц, можно обойтись и без Basic.
Откройте Стилиста (F11), переключите его на Стили страниц. Книжная ориентация - это стиль страницы "Обычный", альбомная, соответственно, "Альбомный". Двойной клик по соответствующему названию стиля применяет его к  документу.

smaharbA

Елена - а как это сделать одним нажатием мыши ?

+ за стили нужно убивать не только авторов, но и всех использователей
Я конечно далек от мысли... (с)