"ThisWorkbook.Worksheets("Weinachten").Range(Cells(2, 1), Cells(Range("H2").End(xlDown).Row, 8)).Copy
ThisWorkbook.Worksheets("Tabelle 2").Cells(1, 2).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True"
Fehlermeldung: Index außerhalb des gültigen Bereichs
Weiß jemand spontan was da der Fehler sein könnte?