如何将3个单独的excel表变成一个

将三个单独的Excel表合并成一个，您可以选择以下几种方法：

方法一：使用Excel的“合并工作簿”功能

1. 打开第一个Excel文件。

2. 点击“文件”菜单，选择“打开”，然后选择第二个Excel文件。

3. 在打开第二个工作簿的对话框中，取消勾选“合并工作簿到当前活动工作簿”，然后点击“确定”。

4. 重复步骤2和3，打开第三个Excel文件。

5. 现在三个工作簿都会显示在同一个Excel窗口中。

6. 您可以点击每个工作簿标签，然后使用“移动或复制工作表”功能将需要的表格移动到同一个工作簿中。

方法二：使用“合并工作表”功能

1. 打开三个Excel文件。

2. 选择第一个Excel文件，点击“开始”选项卡下的“合并工作表”按钮。

3. 在弹出的对话框中，选择要合并的第一个工作表。

4. 点击“添加”按钮，然后选择第二个Excel文件中的工作表。

5. 重复步骤4，添加第三个Excel文件中的工作表。

6. 点击“确定”，所有选中的工作表将被合并到一个新的工作簿中。

方法三：手动复制粘贴

1. 打开三个Excel文件。

2. 分别将每个工作表的内容复制到剪贴板。

3. 打开一个新的Excel文件。

4. 在新的Excel文件中，选择一个工作表，然后粘贴复制的第一个工作表的内容。

5. 重复步骤4，粘贴剩余的工作表内容。

方法四：使用VBA宏

如果您熟悉VBA（Visual Basic for Applications），可以编写一个宏来自动合并工作表。

1. 打开Excel，按 `Alt + F11` 打开VBA编辑器。

2. 在“插入”菜单中选择“模块”，在打开的代码窗口中输入以下宏代码：

```vba

Sub 合并工作表()

Dim ws As Worksheet

Dim wb As Workbook

Dim i As Integer

i = 1

For Each wb In Application.Workbooks

For Each ws In wb.Sheets

If ws.Name <> "合并" Then

If i = 1 Then

ws.Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)

Else

ws.Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count 1)

End If

i = i + 1

End If

Next ws

Next wb

End Sub

```

3. 关闭VBA编辑器，回到Excel界面，按 `Alt + F8`，选择“合并工作表”，然后点击“运行”。