海风游戏狂欢季-独家活动首发平台

为了展示复制表，我们将考虑以下名为数据集的表。我们将此工作表复制到新工作表中。

方法 1 – 使用上下文菜单复制 Excel 中的工作表步骤：

选择您要复制的工作表。右键单击工作表名称。从上下文菜单中，选择移动或复制。

将出现一个名为移动或复制的对话框。选择要在其之前复制工作表的工作表。在这里，我们选择了名为数据集的工作表。选中创建副本框。按确定。

您的工作表将在您选择的工作表（数据集）之前复制。

方法 2 – 使用键盘快捷键在 Excel 中复制工作表步骤：

选择工作表上的第一个单元格。要选择所有占用的单元格，请按 Ctrl + Shift + End。

按 Ctrl+ C 复制所有单元格。

在工作簿中打开一个新工作表。在这里，我们打开了名为“Keyboard Shortcuts (2)”的工作表。选择第一个单元格。按Ctrl+V。

您的工作表将被复制到名为“键盘快捷键 (2)”的工作表中。

方法 3 – 通过拖动将一张纸复制到另一张纸步骤：

按 Ctrl 并单击要复制的工作表的名称。 您还可以单击要复制的工作表，然后按Ctrl。

将工作表拖至要复制的位置。

松开 Ctrl 和鼠标，您将获得复制的工作表。

方法 4 – 使用“单元格”选项卡复制 Excel 中的工作表

步骤：

打开您要复制的工作表。转到主页选项卡，选择单元格，选择格式，然后选择移动或复制工作表。

将出现名为移动或复制的对话框。选择要在其之前复制工作表的工作表。选中创建副本框。按确定。

您的工作表将在您选择的工作表之前被复制。

方法 5 – 应用 VBA 代码将 Excel 中的一个工作表复制到另一个工作表步骤：

打开您的工作表。将 Excel 文件另存为启用 Excel 宏的工作簿 (xlsm)。选择开发人员选项卡，然后选择Visual Basic。

从插入选项卡中，选择模块。

将以下代码复制到模块中。Public Sub Copying_sheet_with_renaming()

Dim copy_sheet As String

copy_sheet = InputBox("Write duplicated worksheet name")

If copy_sheet <> "" Then

ActiveSheet.Copy After:=Worksheets(Sheets.Count)

ActiveSheet.Name = copy_sheet

End If

End Sub

代码分解

在这里，我们创建了一个名为 Copying_sheet_with_renaming 的公共子过程。接下来，我们将变量 copy_sheet 声明为字符串。然后，我们使用输入框重命名复制的工作表。保存代码并返回 Excel 文件。从开发人员选项卡中，选择宏。

选择宏 (Copying_sheet_with_renaming) 并单击运行。

您将看到以下名为Microsoft Excel的输入框。为副本写一个名称。单击确定即可查看该工作表。

您将获得一个名为“复制 VBA 代码”的复制表。

如何将工作表复制到 Excel 中的另一个工作簿步骤：

右键单击工作表名称，打开工作簿中的移动或复制框。如果您想将工作表复制到另一个工作簿（已存在），则需要同时打开两个工作簿。

在移动或复制对话框中，在到图书框中选择新图书。如果您要复制到其他工作簿，请从下拉列表中选择它（如果它打开）。选中创建副本框。按确定。

如果您选择新工作簿，您的工作表将被复制到“Book2”工作簿中。您还可以通过拖动或使用格式方法从另一个工作簿复制工作表。

实践部分您可以自己练习复印纸张。