Tabellenblatt kopieren

Question

Hallo,

ich möchte ein Tabellenblatt an das Ende der Datei Test.xlsx kopieren:

Worksheets(shBlatt.name).Copy After:=Workbooks("Test.xlsx").Sheets(Sheets.Count)

Das klappt leider nicht "Index außerhalb des gültigen Bereichs".
Was mache ich falsch?
Danke für euren Tipp!
Gruß A.

Answer 1

Hab's gefunden..

Worksheets(shBlatt.name).Copy After:=Workbooks("Test.xlsx").Sheets(Workbooks("Test.xlsx").Sheets.Count)