使用Power Query可自动合并多Excel文件：选择“从文件夹”导入，筛选Excel文件并展开指定工作表，统一结构后加载至新表；2. VBA宏实现批量合并：编写代码遍历指定文件夹中的.xlsx文件，逐一打开并将各工作表复制到当前 workbook，运行后自动完成合并；3. 少量文件可手动复制工作表：通过“移动或复制”功能，逐个将源文件工作表复制到目标汇总文件中，并重命名区分来源。三种方法按效率递增，适用于不同场景。
如果您需要将多个Excel工作簿中的数据整合到一个文件中，以便于统一查看或分析，可以通过多种方式实现。手动复制粘贴虽然可行，但效率低下且容易出错。以下是几种高效合并多个Excel工作簿的方法。
本文运行环境：Dell XPS 13，Windows 11
一、使用Power Query合并多个工作簿
Power Query是Excel内置的强大数据处理工具，能够从多个文件中自动提取并合并数据，特别适合处理大量结构相似的Excel文件。
1、打开一个新的Excel工作簿，点击“数据”选项卡，选择“获取数据”→“从文件”→“从文件夹”。
2、在弹出的窗口中，浏览并选择存放所有需要合并的Excel文件的文件夹，点击“确定”。
3、系统会列出该文件夹中的所有文件，找到包含目标工作表的Excel文件，点击“转换数据”进入Power Query编辑器。
4、在Power Query中，筛选出文件类型为“Excel”的条目，并点击“内容”列右侧的展开图标，选择需要合并的工作表名称。
5、确保所有数据结构一致后，点击“扩展”按钮展开数据列，选择需要保留的列字段。
6、点击“关闭并加载”，数据将自动合并并导入当前工作簿的新工作表中。
二、使用VBA宏代码批量合并
VBA可以自动化执行重复性任务，通过编写一段宏代码，能够快速读取指定文件夹下的所有Excel文件，并将其工作表内容合并到当前工作簿中。
1、按Alt + F11打开VBA编辑器，在左侧项目窗口中右键点击，选择“插入”→“模块”。
2、将以下代码粘贴至代码窗口：
Sub 合并多个工作簿() Dim wb As Workbook, ws As Worksheet Dim folderPath As String Dim fileName As String folderPath = "C:\你的文件夹路径\" ' 修改为此处的实际路径 fileName = Dir(folderPath & "*.xlsx") Do While fileName "" Set wb = Workbooks.Open(folderPath & fileName) For Each ws In wb.Worksheets ws.Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count) Next ws wb.Close False fileName = Dir Loop End Sub
3、修改代码中的文件夹路径为实际存储Excel文件的路径。
4、返回Excel界面，按F5运行宏，所有文件中的工作表将被复制到当前工作簿。
三、手动复制工作表进行合并
当需要合并的文件数量较少时，可以直接通过复制整个工作表的方式进行合并，操作简单直观。
1、打开第一个要合并的Excel文件，右键点击底部的工作表标签，选择“移动或复制”。
2、在弹出的对话框中，“将选定工作表移至工作簿”选择目标合并文件（即最终汇总的工作簿）。
3、勾选“建立副本”，点击“确定”，该工作表将被复制过去。
4、重复上述步骤，依次将其他文件中的工作表复制到同一工作簿中。
5、可根据需要重命名各工作表以区分来源。
