Mit Basic das Papierformat eines Tabellenblattes ändern

Das Tabellenkalkulationsprogramm

Moderator: Moderatoren

Pit66
Beiträge: 2
Registriert: Mi, 11.03.2020 15:28

Mit Basic das Papierformat eines Tabellenblattes ändern

Beitrag von Pit66 » Mi, 11.03.2020 15:43

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
********
Beiträge: 3454
Registriert: Mo, 28.02.2011 17:49

Re: Mit Basic das Papierformat eines Tabellenblattes ändern

Beitrag von F3K Total » Mi, 11.03.2020 15:59

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
Beiträge: 2
Registriert: Mi, 11.03.2020 15:28

Re: Mit Basic das Papierformat eines Tabellenblattes ändern

Beitrag von Pit66 » Mi, 11.03.2020 16:08

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

Antworten