27.12.2017, 15:04
Hallo zusammen,
ich bekomme es nicht hin kopierte Datensätze per Makro in eine andere Arbeitsmappe in die erste freie Zeile einzufügen.
Bisher habe ich:
Sub Folgeimport()
'
' Folgeimport Makro
'
'
Windows("Datenquelle.XLSX").Activate
Range("A2").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Selection.Copy
Windows("Ziel.xlsm").Activate
Sheets("Daten_aus_Quelle").Select
Range("A1").Select
Selection.End(xlDown).Select
Damit komme ich in die letzte Zeile mit Daten, ich muss aber eine Zeile weiter um neue Datensätze einzufügen.
Hat jemand einen Lösungsansatz
ich bekomme es nicht hin kopierte Datensätze per Makro in eine andere Arbeitsmappe in die erste freie Zeile einzufügen.
Bisher habe ich:
Sub Folgeimport()
'
' Folgeimport Makro
'
'
Windows("Datenquelle.XLSX").Activate
Range("A2").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
Selection.Copy
Windows("Ziel.xlsm").Activate
Sheets("Daten_aus_Quelle").Select
Range("A1").Select
Selection.End(xlDown).Select
Damit komme ich in die letzte Zeile mit Daten, ich muss aber eine Zeile weiter um neue Datensätze einzufügen.
Hat jemand einen Lösungsansatz
wer fragt, gilt vielleicht für den Augenblick als dumm...
...wer nicht fragt bleibt es sein Leben lang!
...wer nicht fragt bleibt es sein Leben lang!