OpenOffice.info

Sub Main
    oSheets = ThisComponent.Sheets
    nCount = oSheets.count
    oSheets.copyByName( "Tabelle1", "Tabelle" & (nCount+1), nCount) "
End Sub

Moin,
Rechtsklick auf den Tabellenreiter -> verschieben/kopieren -> kopieren (Haken unten) anhaken, OK
oder Makro um Tabelle1 zu kopieren:
[code]Sub Main
oSheets = ThisComponent.Sheets
nCount = oSheets.count
oSheets.copyByName( "Tabelle1", "Tabelle" & (nCount+1), nCount) "
End Sub[/code]
Gruß R
EDIT: Wenn dann die Schaltflächen oder Makros nicht mehr funktionieren, dann liegt es daran, dass sie sich auf Tabelle1 beziehen..müssen halt angepasst werden, oder gleich so geschrieben werden, dass sie sich immer auf das "auslösende" Tabellenblatt beziehen.

Hallo zusammen,

sorry bin total unbegabt, habe aber einfache dinge bis jetzt dank eurem Forum hinbekommen.

Habe eine Kalkulation in der Tabelle 1 erstellt, nun möchte ich diese in die Tabelle 2 kopieren
inklusive den Schaltflächen und die damit verbundenen Makros.

Habe es versucht doch ich komme nicht weiter........ funktioniert dies überhaupt?