Hallo
ich möchte eine Zeile per Macro auswählen und diese kopieren. Die kopierte Zeile soll dann in einer anderen Datei wieder eingefügt werden (dies aber manuell)
Versuch 1:
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:Copy", "", 0, Array())
Versuch 2:
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 ----------------------------------------------------------------------
dim Args()
oCtrl = ThisComponent.CurrentController
oCtrl.Select(oCtrl.ActiveSheet.GetCellRangeByName("A55:"+"BH55")
dispatcher.executeDispatch(document, ".uno:Copy", "", 0, Args())
Beide Versuche funktionieren nicht.
Es wird immer ein anderer zuvor kopierter Text in ein neues Tabellenblatt eingefügt
Makro Zeile kopieren
Moderator: Moderatoren
Re: Makro Zeile kopieren
Moin,
deine Variante 2 funktioniert bei mir ganz hervorragend, der Zellinhalt A55:BH55 wird mit STRG+V in die neue Datei eingefügt.
Datei anbei
Gruß R
deine Variante 2 funktioniert bei mir ganz hervorragend, der Zellinhalt A55:BH55 wird mit STRG+V in die neue Datei eingefügt.
Datei anbei
Gruß R
- Dateianhänge
-
- DATEN_IN_ZWA.ods
- (9.98 KiB) 109-mal heruntergeladen
- miniKasse MMove 1.0.6 Base Videotutorial
- Windows 10: AOO, LO Linux Mint: AOO, LO