将工作表从1个工作簿复制到另一个打开的工作簿

时间:2019-09-03 17:38:36

标签: excel vba

我正在使用下面的代码将工作表从一个打开的工作簿移动到另一个打开的工作簿,但是它在代码的最后一行中断了。从我在网上看到的所有内容看来,这段代码应该可以工作。

Error MSG : (Run-time error '9') (Subscription out of range)

Sheets("Summary ML").Select

Workbooks.Open Filename:=outputfile
Windows(wb).Activate
Sheets("Summary ML").Select
Sheets("Summary ML").Copy After:=Workbooks("outputfile.xlsx").Sheets(2)

1 个答案:

答案 0 :(得分:0)

也许您可以使用:

Workbooks("Book1.xlsx").Worksheets.Copy Before:=Workbooks("Book2.xlsx").Sheets(1)

如果您不了解sheet(1)的含义,则可以进行debug.print sheet(1).Name

亲切的问候。