OoOHWHOoO schrieb:
> wenn das Makro
>
> Sub InsertRow
> 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
>
> die Zeile an der von Dir gewünschten Stelle einfügt, dann muss man nur
> noch die Zellen dieser Zeile entsprechend formatieren. Das kann man auch
> mit dem Makro gleich mit machen.
Mit "Format" meinte ich nicht nur visuelle Merkmale, sondern auch
solche wie "Daten > Gültigkeit".
Es ist mir zu fehleranfällig und aufwändig sämtliche Merkmale der
Zeilen mit Einträgen auch über das Makro erneut zuweisen zu müssen.
Vielleicht gibt es einen anderen Ansatz, wo man die neue Zeile in
"unter Zeile 2 erzeugt" und sie danach "nach oben verschiebt".
Wenn ich mich richtig erinnere, gibt es ja Plugins ("CellMover" oder
so) für die in LO fehlenden Verschiebefehle.
Gruß, Andreas
--
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
