Copy Paste in nächste leere Zeile
08.02.2017 16:43:02
RE
Ich habe ein Makro geschrieben, indem es den ausgewählten Bereich in eine neue Datei kopiert.
Wie kriege ich es hin, dass es bei jedem kopieren in die nächste leere Zeile kopiert?
Habe folgenden Code, aber ich weiss nicht genau wie ich diesen in mein Makro integrieren muss. Kann mir bitte jemand weiterhelfen?
Hier der aktuelle Code:
Sub copy()
Selection.copy
Windows("Zusammenfassung Sales.xlsm").Activate
Range("C4").PasteSpecial xlPasteValues
ActiveSheet.Paste
'kopieren mit Ctrl+Shift+C
End Sub
.Cells(.Rows.Count, 3).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Danke und Gruss,
RE