Hallo Andreas,
dieses Makro (s.u.) fügt nach der 1. Zeile (Index = 0) eine neue Zeile
ein. "Y" ist dabei der Index der einzufügenden Zeile.
Makro über eine Schaltfläche ausführen:
http://de.openoffice.info/viewtopic.php?t=65717
Gruß
Hans-Werner :-))
Sub InsertRow
'
https://api.libreoffice.org/docs/idl/ref/interfacecom_1_1sun_1_1star_1_1table_1_1XTableRows.html
Dim oD as Object ' [object] Dokument
Dim oT as Object ' [object] Tabellenblatt
dim oZ as Object ' [object] Zeile
Dim A as Long ' Anzahl
Dim Y as Long ' Y-Index (1.Zeile: Y=0)
oD = ThisComponent
oT = oD.Sheets(0)
oZ = oT.getRows
Y = 1
A = 1
oZ.insertByIndex(Y,A)
End Sub
--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme?
https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy
