Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Hallo
Ich habe ein Makro erstellt, wo ich Daten aus dem Blatt "Rechnung" in das Blatt "Warenausgang" kopieren möchte. Allerdings kopiert es mir immer in die gleiche Zeile und überschreibt die vorherigen Resultate. Ich möchte, dass es mir die Resultate in die nächste leere Zelle einfügt.
Hier das Makro.

Sub Waren_final()
    Range("A24:F40").Select
    Selection.Copy
    Sheets("Warenausgang").Select
    Range("A5").Select
    Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
        xlNone, SkipBlanks:=True, Transpose:=False
    Range("H25").Select
    Sheets("Rechnung").Select
    Range("A24:B40,D24:D40").Select
    Range("D24").Activate
    Application.CutCopyMode = False
    Selection.ClearContents
    Range("G35").Select
End Sub

Vielen Dank für die Hilfe...