Mit Basic das Papierformat eines Tabellenblattes ändern

[Pit66]

Hallo!

ich möchte das Papierformat eines Tabellenblattes mittels Basic ändern.
oDoc = ThisComponent
oSheet = oDoc.Sheets.getByName("Tabelle")
msgbox(oSheet.PaperSize.Width)
Diese Eigenschaft gibt es offensichtlich nicht...

Über das Menü würde man Format - Seite - Papierformat - benutzerdefiniert Breite / Höhe einstellen
Der Macrorecorder hat leider nichts aufgezeichnet.
Im Internet habe ich nur etwas zu den Druckereinstellungen gefunden, was aber nicht dasselbe ist.
Kann mir jemand helfen?

Pit

[F3K Total]

Moin,
um der Seitevorlage "Standard" DIN A5 Querformat zu geben, geht folgendes Makro:

Code: Alles auswählen

Sub Main
    oPS = thisComponent.StyleFamilies.PageStyles
    oPS_Standard = oPS.getbyName("Standard")
    oPS_Standard.Height = 29700/2
    oPS_Standard.Width = 21000
End Sub

Gruß R

[Pit66]

Super, Vielen Dank!
Auf die Standardseite kann ich jetzt zugreifen.
Nun muss ich mich nur noch durchhangeln bis zum Benutzerdefinierten Format.