使用合并计算、Power Query或VBA可高效整合多Excel工作簿数据。首先，合并计算支持按标签汇总结构相似的数据；其次，Power Query能自动提取并合并同一文件夹内多个工作簿的指定工作表；最后，VBA宏可实现定时批量复制粘贴，适用于重复性任务，提升处理效率。
如果您需要将多个Excel工作簿中的数据整合到一个工作表中进行统一分析，但发现手动复制粘贴效率低下且容易出错，可以通过合并计算功能快速完成。以下是实现多工作簿数据汇总的几种有效方式。
本文运行环境：Dell XPS 13，Windows 11
一、使用合并计算功能汇总数据
Excel内置的“合并计算”功能支持从多个区域或工作簿中按行标签或列标签进行数据汇总，适用于结构相似的数据表。
1、打开目标工作簿，在工作表中选择要放置汇总结果的起始单元格。
2、切换到数据选项卡，点击合并计算按钮。
3、在弹出窗口中，选择所需的函数（如求和、平均值等），然后在“引用位置”框中逐个添加来自不同工作簿的数据区域。
4、通过点击右侧的折叠按钮，打开其他工作簿并选中对应的数据区域，添加至引用列表。
5、勾选首行和最左列选项，确保标签正确匹配，点击确定完成汇总。
二、利用Power Query合并多个工作簿
Power Query能够自动化地从多个文件夹或文件中提取并转换数据，适合处理大量结构一致的工作簿。
1、在Excel中选择数据 → 获取数据 → 从文件 → 从文件夹。
2、浏览并选择存放所有待合并工作簿的文件夹，点击确定。
3、系统会列出该文件夹内的所有文件，筛选出Excel文件类型（.xlsx 或 .xls），点击组合按钮并选择合并和加载。
4、在弹出窗口中指定工作表名称或表格名称，确保所有工作簿中数据位于相同名称的工作表中。
5、确认设置后，Power Query将自动导入所有工作簿中的数据，并合并为单一数据表。
6、点击关闭并上载，将结果加载至当前工作簿的工作表中。
三、通过VBA宏代码批量汇总数据
当需要定期执行多工作簿合并任务时，编写VBA脚本可实现全自动处理，提升重复性工作的效率。
1、按下Alt + F11打开VBA编辑器，插入一个新模块。
2、输入以下基础代码框架：
Sub 合并多个工作簿()
Dim wb As Workbook, ws As Worksheet
Dim folderPath As String, 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.UsedRange.Copy Destination:=ThisWorkbook.Sheets(1).Cells(Rows.Count, 1).End(xlUp).Offset(1, 0)
Next ws
wb.Close SaveChanges:=False
fileName = Dir
Loop
End Sub
3、修改代码中的文件夹路径为实际存储多个工作簿的目录。
4、运行宏，所有工作簿中的数据将被依次复制到当前工作簿的第一张工作表中。
