Openoffice per Basic zu erweitern ist leider ganz schön anstrengend, hier ein schneller Entwurf um eine Zeile tiefer zu gehen, ist keine tiefere Zeile da, wird eine angehängt. Funktioniert also wie ein Tab in der letzten Tabellenzelle.
Sub ZeileRunter
Rem viewcursor in table, max columns=26 wg cellname
ViewCursor = thisComponent.getCurrentController().getViewCursor()
Tabelle = ViewCursor.TextTable
Zeilenzahl = Tabelle.getRows().getCount()
Zelle = ViewCursor.Cell
If Zeilenzahl = CInt(Right(Zelle.Cellname, Len(Zelle.Cellname) -1)) Then
Tabelle.getRows().insertByIndex(Zeilenzahl,1)
End if
ViewCursor.goDown(1,False)
End Sub
