Seite 1 von 1
Außenabstand aller Tabellen ändern
Verfasst: Do, 19.08.2010 20:33
von sebrein
Hallo,
ich habe ca. 70 Tabellen in einem Dokument und möchte den Abstand über allen Tabellen erhöhen.
Ich bin davon ausgegangen, dass ich das im Nachhinein über das Ändern einer Formatvorlage machen kann, finde aber nur Vorlagen für den Tabelleninhalt. Heißt das, dass ich jetzt alle Tabellen einzeln von Hand formatieren muss?
mfg,
sebrein
Re: Außenabstand aller Tabellen ändern
Verfasst: Do, 19.08.2010 20:53
von Stephan
Ich bin davon ausgegangen, dass ich das im Nachhinein über das Ändern einer Formatvorlage machen kann
Warum?
Es ist doch wohl das Allererste was man sich anschaut was für Vorlagen es überhaupt gibt, wenn man sich eine Meinung dazu bildet ob Etwas überhaupt über eine Vorlage einstellbar sein könnte.
Heißt das, dass ich jetzt alle Tabellen einzeln von Hand formatieren muss?
Entweder so oder Du nimmst ein Makro. Folgendes ändert z.B. den oberen Abstand aller Texttabellen in einem Textdokument auf 0,3 cm:
Code: Alles auswählen
Sub ObererAbstand()
TextTables = ThisComponent.getTextTables()
For i = 0 to TextTables.count - 1
Table = TextTables(i)
Table.TopMargin = 300 '0,3 cm
Next i
End sub
Gruß
Stephan
Re: Außenabstand aller Tabellen ändern
Verfasst: Do, 19.08.2010 22:55
von sebrein
Vielen Dank für das Makro!
Wo kann man denn etwas über Makros-Erstellung lernen?
Ich suche zum Beispiel noch eine Möglichkeit bei Tabellen ohne Beschriftung den unteren Abstand auch festzulegen.
Gruß,
sebrein
Re: Außenabstand aller Tabellen ändern
Verfasst: Fr, 20.08.2010 12:11
von Stephan
Wo kann man denn etwas über Makros-Erstellung lernen?
viewtopic.php?f=18&t=1553
Ich suche zum Beispiel noch eine Möglichkeit bei Tabellen ohne Beschriftung den unteren Abstand auch festzulegen.
genau wie bereits im Makro gezeigt, nur statt .TopMargin eben .BottonMargin [1] verwenden
[1]
http://api.openoffice.org/docs/common/r ... ttomMargin
Gruß
Stephan
Re: Außenabstand aller Tabellen ändern
Verfasst: Fr, 20.08.2010 14:28
von sebrein
Ich hab jetzt keine Möglichkeit gefunden über ein Basic-Makro abzufragen, ob eine Tabelle eine Beschriftung hat.
Kann mir da jemand weiterhelfen?
Gruß,
sebrein