Програмно изменить параметры печати

[Aleksandr H.]

Как програмно (через макрос) изменять параметры выделенные на картинках?

[rami]

Код Выделить Развернуть

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

[Aleksandr H.]

Спасибо.
А как узнать имена других свойств стиля страницы?

[rami]

С помощью расширения MRI, часть свойств можно увидеть на снимке экрана: