mit makro markierte Zellen in die erste freie Zeile in Spalte A kopieren

gefragt 2018-09-01 21:02:37 +0200

Dieser Post ist als Wiki-Post markiert

Das ist ein Wiki-Beitrag. Jeder mit Karma >75 darf diesen Beitrag verbessern.

Guten Abend, versuche ohne Erfolg per Makro eine Anzahl von Zellen (BA1:BH1) in die erste freie Zeile A--- zu kopieren. Wenn ich im Makro die Zielzelle z.B. BA6 eingebe funktioniert der Kopier-Vorgang problemlos. Hier ein Auszug des Kopiervorgangs im Makro :

dispatcher.executeDispatch(document, ".uno:InsertContents", "", 0, args54())

rem ----------------------------------------------------------------------
dim args55(0) as new com.sun.star.beans.PropertyValue
args55(0).Name = "ToPoint"
args55(0).Value = "$BA$6"

dispatcher.executeDispatch(document, ".uno:GoToCell", "", 0, args55())

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

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

end sub

Wie kann ich nun in args55(0) die Eingabe der ersten freien Zeile in Spalte A ermittlen und einfügen ?? Würde mich für eine Unterstützung sehr freuen. Liebe Grüße Peter

Bearbeiten Tags ändern Melden schließen vereinen löschen