Excel多个表格合成一个表格的4种方法

游戏攻略2025年04月05日 18:33:4614admin

Excel多个表格合成一个表格的4种方法在日常办公中，我们经常需要将Excel中的多个工作表或不同工作簿中的表格合并成一个总表。我们这篇文章将详细介绍四种实用方法，帮助您高效完成表格合并操作，包括Power Query法、VBA宏法、函数

excel多个表格合成一个表格

Excel多个表格合成一个表格的4种方法

在日常办公中，我们经常需要将Excel中的多个工作表或不同工作簿中的表格合并成一个总表。我们这篇文章将详细介绍四种实用方法，帮助您高效完成表格合并操作，包括Power Query法、VBA宏法、函数公式法以及第三方工具法。每种方法都附有详细步骤说明和适用场景分析。

方法一：使用Power Query合并（推荐）

Power Query是Excel 2016及以上版本内置的強大数据整合工具：

打开Excel→数据选项卡→点击获取数据→选择从文件→从工作簿
选择目标文件后，在导航器勾选选择多项，选中需要合并的工作表
点击转换数据进入Power Query编辑器
在右侧查询窗格右键→新建查询→合并→将查询合并为新查询
设置连接种类为"追加"，选择要合并的表数量
点击关闭并上载即可生成合并后的新表

优势：支持自动刷新，当源数据更新时可一键同步；适合每月定期合并同类报表

方法二：VBA宏代码法

适合需要频繁合并的场景（代码会自动跳过表头）：

Sub 合并工作表()
    Dim ws As Worksheet, rng As Range
    Set 总表 = Sheets.Add(After:=Sheets(Sheets.Count))
    总表.Name = "合并结果"
    
    For Each ws In Worksheets
        If ws.Name <> 总表.Name Then
            lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row
            Set rng = ws.Range("A2:Z" & lastRow)
            rng.Copy 总表.Cells(总表.Rows.Count, "A").End(xlUp).Offset(1)
        End If
    Next ws
End Sub

使用步骤： 1. 按Alt+F11打开VBA编辑器 2. 插入→模块 3. 粘贴代码后按F5运行 4. 合并结果将生成新工作表

方法三：函数公式法

适合少量表格的灵活合并：

函数组合	作用	示例
INDIRECT+ROW	跨表动态引用	=IFERROR(INDIRECT("Sheet"&ROW(A1)&"!A2"),"")
VSTACK（365新版）	垂直堆叠数组	=VSTACK(Sheet1!A2:D100,Sheet2!A2:D50)