Форум поддержки пользователей LibreOffice, Apache OpenOffice

Главная категория => Calc => Тема начата: Aleksandr H. от 26 октября 2014, 18:54

Название: Програмно изменить параметры печати
Отправлено: Aleksandr H. от 26 октября 2014, 18:54
Как програмно (через макрос) изменять параметры выделенные на картинках?
Название: Re: Програмно изменить параметры печати
Отправлено: rami от 26 октября 2014, 21:55
Sub Main
DefStyle=ThisComponent.StyleFamilies.getByName("PageStyles").getByName("Default")
DefStyle.LeftMargin=3000        'левое поле
DefStyle.RightMargin=1000       'правое поле
DefStyle.TopMargin=500          'верхнее поле
DefStyle.BottomMargin=1000      'нижнее поле
DefStyle.ScaleToPagesX=1        'страниц по ширине
DefStyle.ScaleToPagesY=1        'страниц по высоте
'Print "Стиль страницы = " & ThisComponent.CurrentController.getActiveSheet().PageStyle   'если нужно узнать стиль страницы
End Sub
Название: Re: Програмно изменить параметры печати
Отправлено: Aleksandr H. от 26 октября 2014, 22:41
Спасибо.
А как узнать имена других свойств стиля страницы? :)
Название: Re: Програмно изменить параметры печати
Отправлено: rami от 26 октября 2014, 23:19
С помощью расширения MRI (http://extensions.openoffice.org/en/project/mri-uno-object-inspection-tool), часть свойств можно увидеть на снимке экрана: