Bom dia!

Amigos, como posso fazer para configurar a página de uma planilha para que ela fique default como LANDSCAPE?

Tentei "moldar" esse código, mas não obtive sucesso.

Dim Doc As Object
Dim Sheet As Object
Dim StyleFamilies As Object
Dim PageStyles As Object
Dim DefPage As Object

Doc = ThisComponent
StyleFamilies = Doc.StyleFamilies
PageStyles = StyleFamilies.getByName("PageStyles")
DefPage = PageStyles.getByName("Default")

DefPage.IsLandscape = True
DefPage.Width = 21000
DefPage.Height = 14800

Alguém pode me dar um suporte??

Agradeço,

--- SoupGate-Win32 v1.05
* Origin: fsxNet Usenet Gateway (21:1/5)