Zeilen markieren und per VBA kopieren
Stefan
folgendes Problem:
ich habe mit folgendem Code (der mir hier netterweise zur Verfügung gestellt wurde):
Sub myCopy2()
Dim lngLastRow As Long
With Workbooks("Mappe1").Sheets(1)
lngLastRow = .Cells(.Rows.Count, 1).End(xlUp).Row
Selection.Copy Destination:=.Cells(lngLastRow, 1).Offset(1, 0)
End With
End Sub
die Daten aber überschrieben anstatt anzuhängen. Ich nutze Excel 2007. Kann mir jemand einen Tip geben was hier falsch gelaufen sein könnte? Bei einem vorherigen Test mit Excel2002 hat es noch geklappt. Ich habe keine Ahnung was schief gelaufen ist.
Vielen Dank
Stefan
Anzeige