Ich möchte Datensätze von einer Arbeitsmappe in eine andere geöffnete Arbeitsmappe mittels VBAS kopieren.
Die Markierung würde bis zum Kopieren der Datensätze klappen:
Sub Test()
Dim bereich As Range
Dim wks As Worksheet
Set wks = ActiveWorkbook.Worksheets("Tabelle1")
Set wks1 = Workbooks("Mappe2.xls").Worksheets("Tabelle1")
Set bereich = wks.Range("A2:DO" & wks.Range("DO65536").End(xlUp).Row)
bereich.Copy
End Sub
Wie füge ich nun die kopierten Datensätze in eine andere geöffnete Arbeitsmappe (Mappe2.xls) in der Tabelle1 ab der letzten freien Zelle in der Spalte A ohne Select ein ?Wie würde hier bitte eine VBa Lösung aussehen?
Danke
Josef