Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Planilha

26 views
Skip to first unread message

Raimundo Machado de Morais Neto

unread,
Mar 31, 2022, 9:12:03 AM3/31/22
to
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,
0 new messages