Makro Zeile kopieren

[knpe]

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

[F3K Total]

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