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

Microsoft Office 2003-2019 => Excel => Thema gestartet von: Maluk am April 22, 2018, 15:27:08 Nachmittag

Titel: Makro - Einfügen in nächste leere Zeile
Beitrag von: Maluk am April 22, 2018, 15:27:08 Nachmittag

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...

Titel: Antw: Makro - Einfügen in nächste leere Zeile
Beitrag von: gmg-cc am April 22, 2018, 19:39:38 Nachmittag

Moin,
das Makro hast nicht du erstellt sondern der Makro-Rekorder (so grauenhaft programmiert noch nicht einmal ein Anfänger).
Und zweitens hast du ein Crossposting (http://www.excel-ist-sexy.de/forenhilfe/crossposting/) erstellt, was mich an einer Beschäftigung mit deinem Problem hindert.