Seite 1 von 1

Mit Basic das Papierformat eines Tabellenblattes ändern

Verfasst: Mi, 11.03.2020 15:43
von 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

Re: Mit Basic das Papierformat eines Tabellenblattes ändern

Verfasst: Mi, 11.03.2020 15:59
von 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

Re: Mit Basic das Papierformat eines Tabellenblattes ändern

Verfasst: Mi, 11.03.2020 16:08
von Pit66
Super, Vielen Dank!
Auf die Standardseite kann ich jetzt zugreifen.
Nun muss ich mich nur noch durchhangeln bis zum Benutzerdefinierten Format.