Zeile kopieren-einfügen mit Verschieben

Antwort erstellen


BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet

Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Zeile kopieren-einfügen mit Verschieben

Re: Zeile kopieren-einfügen mit Verschieben

von Stephan » Mi, 08.08.2012 21:42

Warum beachtest Du nic ht die Hinweise die ion jedem Unterforum stehen?

siehe:
viewtopic.php?f=2&t=53237

Warum machst Du es späteren Lesern unnötig schwer Inhalte zu finden indem Du Threads unnötig verlängerst?


Die vermisste Funktion "kopierte Zeilen einfügen" kann man kaum erklären, schon gar nicht jemandem, der schon eine Lösung hat, bevor er das Problem verstanden hat.
Komisch da bereits dieser eine Satz genügt zu verstehen was Du willst. Ich habe somit keine Ahnung was daran schwer zu erklären wäre.
und in OpenOffice ist es zum Schreien umständlich
für mich nicht nachvollziehbar, da man das Ganze einmalig aufzeichnen kann und einer Tastaturkombination zuweisen und immer wieder benutzen. Dauer 1 Minute.

Code: Alles auswählen

sub Zeilen_einfuegen_verschieben
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertRows", "", 0, Array())

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:Paste", "", 0, Array())

end sub

Gruß
Stephan

Nach oben