推荐使用Power Query合并多工作表，操作稳定可更新；数据→从工作簿选择文件，在导航器中选表并转换，勾选需合并的工作表，组合后加载至新表，支持刷新同步。少量表格可用手动复制粘贴法，新建“汇总”表，依次复制各表数据（跳过标题行）并粘贴至下方，注意字段顺序一致。熟悉VBA者可使用宏自动合并，按Alt+F11插入模块粘贴代码，运行后非“汇总”表的数据将被整合，首行标题仅保留一次。无论何种方法，需确保各表结构统一，列名顺序一致，避免错位；Power Query安全性高，支持清洗；VBA操作前建议备份文件；合并后应检查空行、重复标题及格式问题。根据数据量和频率选择合适方式，Power Query适用于大多数场景，值得掌握。
在日常工作中，经常需要将多个工作表中的数据汇总到一个总表中。Excel提供了多种方式来合并多个工作表的数据，下面介绍几种常用且实用的方法，适合不同基础的用户操作。
使用“获取和转换数据”功能（Power Query）
这是最推荐的方式，尤其适用于多个结构相同的工作表合并，操作稳定且可重复更新。
- 打开Excel，点击菜单栏的数据 → 从工作簿，选择当前文件或外部文件。
- 在导航器中会列出所有工作表，选中包含数据的工作表区域，点击转换数据。
- 在Power Query编辑器中，系统会自动列出所有工作表名称。勾选要合并的工作表，通常保留Content列。
- 点击组合按钮，选择组合文件夹或合并表格，确认数据结构一致后，加载到新工作表。
- 点击关闭并上载，数据就会自动合并到新表中。以后源数据更新，只需右键刷新即可同步。
手动复制粘贴法（适合少量表格）
如果工作表数量少，结构简单，可以直接复制粘贴。
- 新建一个工作表，命名为“汇总”或其他合适名称。
- 依次打开每个工作表，选中数据区域（注意跳过标题行，避免重复）。
- 复制数据后，在“汇总”表中粘贴到已有数据的下方。
- 确保各表字段顺序一致，否则可能导致数据错位。
使用VBA宏代码自动合并
适合熟悉VBA或需要频繁执行合并任务的用户。
- 按Alt + F11打开VBA编辑器。
- 插入一个新模块，粘贴以下基础代码：
Sub 合并工作表()
Dim ws As Worksheet, targetSheet As Worksheet
Application.ScreenUpdating = False
On Error Resume Next
Set targetSheet = ThisWorkbook.Sheets("汇总")
If targetSheet Is Nothing Then Set targetSheet = ThisWorkbook.Sheets.Add: targetSheet.Name = "汇总"
targetSheet.Cells.Clear
For Each ws In ThisWorkbook.Sheets
If ws.Name <> "汇总" Then
If targetSheet.UsedRange.Rows.Count = 1 And targetSheet.Cells(1, 1).Value = "" Then
ws.UsedRange.Copy targetSheet.Range("A1")
Else
ws.UsedRange.Offset(1, 0).Resize(ws.UsedRange.Rows.Count - 1).Copy _
targetSheet.Cells(targetSheet.Rows.Count, 1).End(xlUp).Offset(1, 0)
End If
End If
Next ws
Application.ScreenUpdating = TrueEnd Sub
- 运行宏后，所有非“汇总”表的数据会被合并，首行只保留一次标题。
注意事项与建议
无论采用哪种方法，都要注意以下几点：
- 确保所有工作表的列名和顺序一致，避免数据混乱。
- Power Query方式最安全，支持错误检查和数据清洗。
- 使用VBA前建议备份文件，防止误操作删除数据。
- 合并后检查是否有空行、重复标题或格式错乱问题。
基本上就这些方法，根据数据量和频率选择合适的操作方式即可。Power Query适合大多数场景，值得花时间掌握。不复杂但容易忽略细节，保持结构统一是关键。基本上就这些。
