OpenOffice.info

Verfasst: **Sa, 12.04.2014 08:56**

Hallo,

ich würde gerne die Höhe des Papierformats mit einem Makro (Symbolleiste) zwischen zwei Varianten umschalten (Din A4 und 12 Zoll).
Ich habe entsprechende Makros in OpenOffice Basic aufgezeichnet, eine Symbolleiste angelegt und die Makros den Schaltflächen zugeordnet - klappt alles.

Allerdings öffnet das Makro nur das Dialogfenster zum Setzen des Papierformats - es soll aber die Höhe der Seite ändern, ohne dass der Benutzer einen Dialog sieht.

Kann mir bitte jemand sagen, wie das Makro in OpenOffice Basic lauten muss, oder einen Tipp geben?

Gruß,
Anna

Moderation:
Thema von Bereich OOo Writer nach OOo Basic und Java verschoben, wo alle Themen zur Basic-Programmierung hingehören.
lorbass, Moderator

Verfasst: **Sa, 12.04.2014 09:18**

AnnaM hat geschrieben:Kann mir bitte jemand sagen, wie das Makro in OpenOffice Basic lauten muss, oder einen Tipp geben?

Vielleicht findest du den Lösungsweg mit Hilfe dieser Beispieldatei:
viewtopic.php?t=57727&p=216205#p216205

Darin zeigt sich nämlich ganz besonders, wie vorteilhaft eigene Seitenvorlagen sein können.

Verfasst: **So, 13.04.2014 10:14**

Vielen Dank, das war schon mal eine Hilfe, aber ganz genau gepasst hat dieser Code-Schnipsel aus dem oooforum.org:

Code: Alles auswählen

Dim oStyle 
Dim sPageStyleName$ 
Dim oDoc 
Dim oVC 
DIM oPageStyles 

oDoc = ThisComponent 

oVC = ThisComponent.getCurrentController().getViewCursor() 
sPageStyleName = oVC.PageStyleName 
oPageStyles = ThisComponent.StyleFamilies.getByName("PageStyles") 
oStyle = oPageStyles.getByName(sPageStyleName) 

	oStyle.height = 29700

Schönen Tag noch!
Anna

OpenOffice.info

Makro zum Einstellen des Papierformats (Höhe) [gelöst]

Makro zum Einstellen des Papierformats (Höhe) [gelöst]

Re: Makro zum Einstellen des Papierformats (Höhe)

Re: Makro zum Einstellen des Papierformats (Höhe)