网站搜索

将多个 Excel 文件合并到一个具有单独工作表的工作簿中(4 种方法)


在此示例中,存在三个不同的 Excel 文件,并且每个文件都包含不同的工作表

方法 1 – 应用移动或复制操作将多个 Excel 文件合并到一个具有单独工作表的工作簿中

步骤:

  • 打开第二个 Excel 文件(合并 Excel 文件 2)。
  • 选择工作表 (Sheet2) 并右键单击鼠标。
  • 在菜单中选择移动或复制

  • 将弹出移动或复制对话框。
  • 到预订选项中选择合并 Excel 文件.xlsx,然后在工作表之前字段中选择(移至末尾)
  • 确定

  • 打开第三个 Excel 文件(合并 Excel 文件 3)。
  • 选择工作表 (Sheet3) 并右键单击鼠标。
  • 在菜单中选择移动或复制

  • 要预订字段中,选择合并 Excel 文件.xlsx,然后在工作表之前中选择(移至末尾)
  • 确定

  • 单独的工作表合并在一个工作簿中。


方法 2 – 使用粘贴链接功能将多个 Excel 文件合并到一个工作簿中

步骤:

  • 合并 Excel 文件 2 中的 Sheet2 复制单元格 B2

  • 转到目标工作簿。在此示例中,目标是合并 Excel 文件
  • 选择一个单元格,B2(此处)。
  • 粘贴选项中选择粘贴链接

  • 将创建如下公式。

  • 删除公式中出现的所有“$”符号,并使用自动填充工具完成该系列。
  • 返回的源工作表如下。

  • 对第三个 Excel 文件重复上述步骤。
  • 这些工作表已合并在一个工作簿中。


方法 3 – 使用 Power Query 将多个文件合并到一个具有单独工作表的工作簿中

步骤:

  • 打开第一个工作簿(合并 Excel 文件)。
  • 转到数据获取数据从文件从工作簿

  • 将弹出导入数据窗口。
  • 选择合并 Excel 文件 2,然后按导入

  • 将弹出导航器窗口。
  • 加载

  • 第二个工作簿中的 Sheet2 将添加为表格

  • 重复此过程以从第三个工作簿获取 Sheet3
  • 所有三张工作表合并在一个工作簿中。


方法 4 – Excel VBA 将多个文件合并到一个具有单独工作表的工作簿中

步骤:

  • 打开目标工作簿。 (合并 Excel 文件)。
  • 开发人员选项卡中选择Visual Basic

  • 插入标签中选择模块

  • 将弹出模块窗口。
  • 插入以下代码。
Sub CombineFiles()
Dim FilesSelected, i As Integer
Dim tempFile As FileDialog
Dim MainBook, sourceBook As Workbook
Dim Sheet As Worksheet
Set MainBook = Application.ActiveWorkbook
Set tempFile = Application.FileDialog(msoFileDialogFilePicker)
tempFile.AllowMultiSelect = True
FilesSelected = tempFile.Show
For i = 1 To tempFile.SelectedItems.Count
Workbooks.Open tempFile.SelectedItems(i)
Set sourceBook = ActiveWorkbook
For Each Sheet In sourceBook.Worksheets
    Sheet.Copy after:=MainBook.Sheets(MainBook.Worksheets.Count)
Next Sheet
    sourceBook.Close
Next i
End Sub

  • 关闭 Visual Basic 窗口。
  • 开发人员选项卡下,选择

  • 将弹出对话框。
  • 宏名称中选择CombineFiles
  • 运行

  • 将弹出一个浏览窗口。
  • 选择要合并的文件,然后按确定

  • 这些工作表已合并为一个工作簿。


相关文章