1. Forum
  2. Usenet
  3. COMP.LANG.XHARBOUR

  • Planilha

    From Raimundo Machado de Morais Neto@21:1/5 to All on Thu Mar 31 06:12:02 2022
    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)