请教如何利用VBA实现将一个工作表复制到另一个工作簿中

Question

如题所述

Answer 1

1、开发工具——VB。

2、输入代码：Sub 复制表() Dim MyBook1 As Workbook  Set MyBook1 = Workbooks.Open("C:\Users\Administrator\Desktop\工作表1.xls")  Sheets("移动表").Select   Sheets("移动表").Copy Before:=Workbooks( _ "工作表2.xls").Sheets(1)MyBook1.CloseEnd Sub。

3、开发工具——宏。

4、执行——复制表。

5、如图，复制完成。