高手常用这4招搞定excel多表合并

高手常用这4招搞定excel多表合并

工作中经常会遇到这样的情况，当你需要制作月报、年报时，发现需要汇总的表格有很多，十多个表格还好，尤其遇到子表成百上千时一个一个复制，那不得累死！

今天就来学习一下如何快速搞定多个表格合并

Method 1

借助Power Query 工具

Power Query是excel2016版新增的功能，下面我们来看看如何利用这个工具实现多表合并。

Step1:单击菜单栏数据→新建查询→从文件→从工作簿，找到需要的文件位置并导入。

Step2:在打开的导航器中选择需要合并的多个工作表，在单击“数据转换”。

Step3:在打开的“查询编辑器”中单击“追加查询”，选择要合并的工作表，单击“确定”按钮。

Step4:单击“关闭并上载”会生成多张工作表，sheet1即为多表合并后的汇总表。

Method 2

运用SQL语句

Step1:]新建一个工作表，单击菜单栏数据→现有连接→浏览更多，找到需要合并的文件，单击“打开”。

Step2:弹出“选择表格”选项卡，单击“确定”进入“导入数据”选项卡，单击“属性”。

Step3:弹出“连接属性”选项卡，在定义选项下命令文本中输入SQL语句，单击确定返回到“导入数据”选项卡，再单击“确定”，多个表格汇总就完成了。

SQL语句书写如下：

select*from[1月$]unionall

select*from[2月$]unionall

select*from[3月$]unionall

select*from[4月$]unionall

select*from[5月$]unionall

select*from[6月$]unionall

select*from[7月$]unional

select*from[8月$]

备注：8为需要合并工作表个数

Method 3

使用函数和公式

Step1:根据需要汇总的信息构建汇总表头

Step2:在需要汇总的信息对应单元格输入公式=INDIRECT($A2&”!”&ADDRESS(INT(ROW（A1)-1)/8+2,COLUMN(A1)))

备注：公式中8为需要合并的工作表个数，A列为工作表名称所在列

Method 4

使用VBA编程

Step1:新建一个表格”汇总表”，单击开发工具→查看代码，输入如下代码：

Option Explicit

Sub Test() ‘多工作表合并

Dim Ws As

Worksheet, k% , SumWs As Worksheet,最后&

Set SumWs =sheets（”汇总表”）

For Each Ws InSheets

If Ws.Name<>”汇总表”Then

K=k+1

If k=1 Then

’复制表头

Ws.Range(“A1”).CurrentRegion.Copy SumWs.[A1]

              Else

               ‘不复制表头

                最后=SumWs.Cells(Row.Ccount,1).End(x1Up).row+1

               Ws.Range(“A1”).CurrentRegion.offset(1,0).Copy SumWs.Cells(最后，1)

            End If

End If

      Next Ws

   End Sub

按F5执行代码，多表合并就完成了。