[RESUELTO] Orientación documento LANDSCAPE

[juamovi]

Buenos días,

Estoy probando de cambiar la configuración del documento CALC creado con VB.NET para que aparezca por defecto como LANDSCAPE, pero no encuentro el método.

¿Alguien sabe cómo se podría hacer?

Gracias

[FJCC-ES]

Código en OooBasic:

Código: Seleccionar todo

  oStyleFamilies = ThisComponent.getStyleFamilies()
  oPageStyles = oStyleFamilies.getByName("PageStyles")
  oDefaultStyle = oPageStyles.getByName("Default")
  oDefaultStyle.setPropertyValue("IsLandscape", True)

[juamovi]

Hola,

Gracias por la respuesta. He probado el código y parece que funcionaba porque al darle a formato de la pagina salia como "horizontal", pero al darle a vista preliminar seguía apareciendo en vertical.

Al final, se trataba de cambiar la orientación del papel. Consultando el libro de Mauricio,algo así:

Código: Seleccionar todo

        
        Dim oSM As Object
        Dim oDir(0) As Object
        Dim oProp As Object
        
        oSM = CreateObject("com.sun.star.ServiceManager")
        oProp = crearEstructura(oSM, "com.sun.star.beans.PropertyValue")
        
        oProp.Name = "PaperOrientation"
        oProp.Value = 1

        oDir(0) = oProp
        mixl.setPrinter(oDir)

Como me dijo Mauricio en otra consulta, he usado CoreReflection por estar trabajando con VB.NET

Por fin he terminado con la migración. Gracias por su ayuda, ha sido fundamental en algunos momentos de atasco.

SalU2