如何在Excel中多次复制多个工作表？

通过Excel中的“移动或复制”命令，您可以一次性将一个工作表、多个特定工作表或所有工作表复制到活动工作簿或另一个工作簿中。

1. 在要复制工作表的工作簿中，在工作表标签栏上选择多个工作表。注意：按住CTRL键，可以在工作表标签栏上逐个点击以选择多个不相邻的工作表标签；按住SHIFT键，可以通过点击第一个和最后一个工作表标签来选择多个相邻的工作表标签。

2. 右键单击工作表标签栏上的选定工作表标签，并选择 移动或复制 从上下文菜单中。请参见截图：

3. 在 移动或复制 对话框中，请指定以下设置：
(1) 请从 目标工作簿 下拉列表中指定要将工作表复制到的目标工作簿。您可以根据需要选择活动工作簿、另一个打开的工作簿或新工作簿。
(2) 指定复制的工作表在工作表标签栏上的位置，您可以选择放在所有现有工作表之后。
(3) 勾选 创建副本 选项，如果不勾选此选项，所选工作表将被移动到目标工作簿中。
(4) 单击 确定 按钮。

现在它会将选定的工作表仅复制一份到指定的工作簿中。要对这些工作表进行多次复制，您可以重复操作多次。

虽然在Excel中复制多个工作表很简单，但如果您想在当前工作簿中多次复制多个工作表，则可能需要反复使用“移动或复制”命令项。是否希望一键完成？借助第三方插件Kutools for Excel的“复制工作表”工具，您只需单击一下即可在Excel中多次复制多个工作表。

1. 单击 Kutools Plus > 复制工作表. 请参见截图：

注意：单击 Kutools Plus > 工作表 > 复制工作表 也可以获得此功能。

2. 在 批量复制工作表 对话框中应用设置：
(1) 勾选要从 复制选中的工作表 部分复制的工作表。
(2) 指定 批量复制的份数.
(3) 确定复制工作表的位置，例如，在所有工作表之前或之后，当前工作表之前或之后。
(4) 单击 确定 按钮。

3. 弹出提示框提醒您已将选中的工作表复制了多次，如需退出，请单击 确定 按钮。请参见截图：

Kutools for Excel的这个批量复制工作表功能只需几次点击即可在活动工作簿中多次复制多个指定的工作表。立即免费试用！

如果您想复制一个指定工作表10次，“移动或复制”命令将是一个耗时的方式，并且必须重复操作多次。但是使用以下VBA代码，您可以快速一次性复制该工作表10次。

1. 按住ALT + F11键，打开Microsoft Visual Basic for Applications窗口。

2. 单击插入 > 模块，并将以下代码粘贴到模块窗口中。

VBA：将某个工作表的多个副本复制到活动工作簿中

Sub Copier ()
Dim x As Integer
x = InputBox("Enter number of times to copy Sheet1")
For numtimes = 1 To x
ActiveWorkbook.Sheets("Sheet1").Copy _
After:=ActiveWorkbook.Sheets("Sheet1")
Next
End Sub

注意：在上述代码中，将“Sheet1”替换为要复制的工作表名称。

3. 然后按 F5 键运行代码，弹出提示框询问您想要复制的工作表数量。

4. 然后单击 确定，指定的工作表已在活动工作簿中复制了100次。

如果您安装了Kutools for Excel，您还可以使用其“合并工作表”功能，只需在Excel中点击几下即可将多个关闭的工作簿中的多个工作表复制到一个新的工作簿中。

1. 单击 Kutools Plus > 汇总 以激活“合并工作表”功能。

2. 在“合并工作表 – 第1步（共3步）”向导中，请勾选 复制多个工作簿中的数据到一个工作表中 选项，并单击 下一步 按钮。请参见截图：

3. 在“合并工作表 – 第2步（共3步）”向导中，请按照以下截图所示操作：
(1) 单击 添加 > 文件 或 目录 以添加要从中复制工作表的工作簿。
(2) 在 工作簿列表 部分，勾选要复制其工作表的工作簿；
(3) 在 工作表列表 部分，勾选要复制的工作表；
(4) 重复上述 (2) 和 (3) 以选择其他要复制的工作簿中的工作表。
(5) 单击 下一步 按钮。

4. 在“合并工作表 – 第3步（共3步）”向导中，请根据需要配置复制设置，并单击 完成 按钮。

5. 现在在新对话框中，请指定一个目标文件夹以保存新的工作簿，在 文件名 框中命名新工作簿，并单击 保存 按钮。请参见截图：

现在另外两个对话框将弹出并要求您打开新工作簿并保存组合方案，请根据需要单击按钮。至此，它已经一次性从多个工作簿中复制了所有指定的工作表。

使用此“合并（工作表）”工具，您可以轻松复制和合并工作表和工作簿，如下列所示。立即免费试用！(1) 快速将多个工作表/区域从工作簿合并到一个工作表中；(2) 快速将跨工作簿的所有同名工作表合并到一个工作表中；(3) 快速将工作表或工作簿合并到一个工作簿中；(4) 快速汇总/计算来自多个工作表的数据到一个工作表中。