Hallo Forum, ich möchte gerne mehrere Tabellenblätter in einer Tabelle vereinigen. Mit dem folgenden Code klappt das schon mal. Allerdings wird die Tabelle nicht in der nächsten leeren Zeile, sondern viel weiter unten bei ca. 1054 eingesetzt.  Was habe ich da im Code falsch gemacht?

Sub Tabellenblaetter_Vereinigen()
 
Dim Sh As Worksheet
 
'Schleife über alle Tabellenblätter
For Each Sh In Worksheets
 
    'Bestimmte Tabellenblätter überspringen
    If (Sh.Name <> "Master" And Sh.Name <> "Drop*" And Sh.Name <> "Dashboard") Then
     
        'Daten kopieren und einfügen
        Sh.UsedRange.Offset(11).Resize(Sh.UsedRange.Rows.Count - 1).Copy
        Meister.Cells(Rows.Count, 1).End(xlUp).Offset(1).PasteSpecial
     
    End If
Next Sh
 
End Sub