如何使用VBA复制工作表

Answer 1

使用VBA复制工作表，可以用以下代码语句。代码如下：

activesheet.copy

复制活动工作表或叫当前工作表。注意复制不是工作簿。鼠标单击哪一个，哪一个就是活动工作表。

或sheets("AAA").copy

复制名称为“AAA”的工作表。不一定是当前工作表。指定复制名称为AAA的工作表。

或activesheet.copy after:=sheets(sheets.count)

复制当前工作表，并存放在当前工作表序号之后。这是复制的方法属性，我们复制一个工作表，总得找个地方存放，这一句是指定存放的位置。

以上VBA复制工作表代码意义各不相同，要根据不同的场景，选择不同的代码。

下面是一个复制存放工作表的完整代码段。供参考。



请点击输入图片描述

Answer 2

不用VBA就可以实现复制。

1、同时打开两个工作簿。

2、鼠标右键点击要移动的工作表，选择移动或复制。

3、在移动或复制工作表汇总，选择另一个工作簿。

4、选择移动到最后，然后勾选建立副本，点击确定。

5、点击确定后，就可以复制过去了。