Seite 1 von 1
Neues Tabellenblatt einfügen
Verfasst: Mi, 03.08.2005 16:39
von hoefri55
Hallo,
ich möchte per Makro ein neues Tabellenblatt in mein Calc-Dokument einfügen. Per Makro-Rekorder klappt das nicht.
Kann mir jemand helfen??
Danke!
Verfasst: Mi, 03.08.2005 16:57
von zap
Hi hoefri55,
das geht einfach: das zweite Argument zu insertNewByName ist die Position an der die neue Tabelle eingefuegt werden soll. D.h. das folgende Makro fuegt eine Tabelle vor und eine nach "Tabelle1" ein.
Code: Alles auswählen
option compatible
sub blatt_einfuegen
oTabellen = ThisComponent.Sheets
REM Prüfen, ob eine Tabelle mit dem Namen "MeineTabelle"" existiert.
If NOT oTabellen.hasbyName("MeineTabelle") Then
REM Tabelle2 existiert nicht, also wird sie eingefügt.
oTabellen.insertNewByName ("MeineTabelle", 1)
End If
REM Eine neue Tabelle mit Namen "Erste" vor allen anderen einfügen.
oTabellen.insertNewByName("Erste", 0)
end sub
Klappt - Danke
Verfasst: Do, 04.08.2005 07:43
von hoefri55
hallo,
das hat mir prima geholfen. Besten Dank.
Friedhelm