今天分享一种不用函数，也不用SQL语句，还不用VBA代码的方法，这种方法只需要鼠标按步骤点一点就可以了！

关键步骤提示

第一步：打开查询编辑器

选择“数据——新建查询——从文件——从工作薄”：

找到要合并工作表的工作薄，确认导入：

在导航器中勾选所有工作表,然后编辑：

打开了导航编辑器：

第二步：追加查询

在导航编辑器中，选择“开始——追加查询”：

将需要合并的9个工作表添加到右侧“要追加的表”，确定：

9个工作表的数据就追加到了查询编辑器。

第三步：关闭查询编辑器，并上载数据

删除生成的多余表格，关闭工作簿查询：

完成了多个工作表的合并。

以上多个工作表合并的方法是利用EXCEL2016版本的“PowerQuery”,即数据查询。我的建议：工具还是跟上技术发展步伐的好。

转载自百家号作者：Excel自学成才

一个工作簿中会有很多个相同格式，标题行内容和顺序都一样的工作表，我们想把这个工作表中的数据全部放至一个总表数据中。

图片上示例是3个工作表，实际工作中可能是几十个，如果一个一个复制粘贴至总表里面，耗费的时间很长，并且容易出错，今天教大家用一段通用的VBA代码来实现一键快速合并，效果如下所示：

只需要点击一下多表合并的按纽，后面所有工作表，会按顺序全部放至汇总表格中。

现在是每个工作表中的标题是4个项目，如果是更多项目，同样的可以进行合并，例如我们在英雄1表格中添加一列

用这个代码，同样的可以进行快速合并，只需要在汇总的表格中添加一个标题第五列，然后点击多表合并按纽即可

同样的，如果是再添加1个工作表，在英雄1后面插入了一个sheet2表格，里面输入一条同样的数据，如下所示：

同样的，只需要点击多表合并按纽便可完成，如下所示：

那么这个VBA代码是什么，如下所示：

Sub 多表合并()

Dim arr()

a = Range("a1").End(xlToRight).Column

For Each sh In Sheets

If sh.Name <> "汇总" Then

arr1 = sh.Range("a2").Resize(sh.UsedRange.Rows.Count - 1, a)

act = act + UBound(arr1)

ReDim Preserve arr(1 To a, 1 To act) '

For j = 1 To UBound(arr1)

n = n + 1

For i = 1 To a

arr(i, n) = arr1(j, i)

Next i

Next j

End If

Next

Sheets("汇总").[a2].Resize(n, a) = Application.Transpose(arr)

End Sub

这段代码直接保存即可，有了这段代码，我们在VBA中插入一个模块，将代码写入进去，插入一个按纽，绑定代码，即可实现，绑定代码的操作过程如下所示：

好，你学会了吗？

给自己持续学习的态度点个赞吧！

欢迎留言讨论，期待您的转发分享！

-------------------------------

谢谢关注，更多精彩内容持续更新中....

前言：最近总有同学提问

怎么能合并多个工作簿？多个Excel表格汇总到一个表中？怎么把表分发给其他人做调查，收回后能批量合并到一个表中？

合并多个表的确是一个难题，好象除了VBA也没有什么好办法，即使是新兴的power query也很难完成固定位置合并的问题。其实兰色在06年就发现了个很神奇的工作簿合并的功能，所以今天再把这篇旧文翻出来，希望能帮到大家。

这个功能是小编昨天无意中发现的，为什么称它为超重量级Excel功能，小编先给你演示个操作。

【例】在一个文件夹中有N个公司的Excel格式报表，需要把这些报表的数据合并到“报表.xlsx”中。

只是点了一个按钮，然后选取了要合并的文件，刷刷刷，各公司的数据已全部合并过来了，是不是很神奇！（合并多个文件的多个工作表也适用）

小编在合并过程中，使用了一个在Excel中隐藏很深的功能：比较和合并工作簿

我们先把它揪出来：

文件- 选项 - 快速访问工具栏 - 不在功能区域中的命令 - 找到“比较和合并工作簿”

然后在快速访问工具栏中就可以看到它了，只是它是灰色的。

它到底怎么才可以用？ 和小编一起开始操作吧！

1、先设置一个报表模板（可以有多个工作表），把格式设置好，然后设置成共享工作簿。

2、把设置好的模板发放给各公司填写。

3、收到各公司上缴的报表，放在一个文件夹里。

4、合并时，点击“比较与合并工作簿"按钮，选取要合并的文件，然后.....如开始动画演示。多个Excel文件的合并瞬间完成！

在实际工作中，这个功能可以省去非常大的工作量，毕竟把N多个报表汇总到一起是一件多么枯燥又费力的事情。

但这个功能只是合并而不能汇总。

别急，小编再教大家一个神技能，多个表格如何汇总！

多个Excel表格汇总到一个表中，有一个神秘技巧帮你实现！

如下图所示工资表中，含有多个月份的数据。要求在汇总表中把所有月份的数据汇总到一起。

操作步骤：

1、数据选项卡 - 现有连接 - 浏览更多。

2、找到当前操作的excel文件。

3、选取任一个表格名称

4、【导入数据】窗口中，显示方式选“数据透视表”，放置位置选工资表A1单元格（也可以选新工作表）

5、选取刚创建的数据透视表，然后点击 数据透视表工具 - 选项 - 更改数据源 - 连接属性。

6、把下面的代码粘贴到命令文本框里。

------------------------------------

select '3月' as 月份, * from [3月$] union all select '4月' as 月份, * from [4月$]union all select '5月' as 月份, * from [5月$]

-------------------------------------

代码说明：

1) 具体的SQL语句一言两语也说不清楚，同学们只需要按下面的模式套用即可。有多少表，连接多少个。

Select * from [表1$] union all Select * from [表2$] union all Select * from [表3$]....union all Select * from [表N$]

2) '3月' as 月份: 是为三个表创建一个共同的字段（月份），其中引号内3月为自定义字符，用来区分工作表，只是不一定要和工作表名称一致。月份是数据透视表要用的字段名，也是自定义的。中间用 as 连接，放在select 之后 *号之前。如果不需要为三个表创建共同字段名，此部分可以省略。

7、连接完成！下面就是对数据透视表的基本操作，添加行、列标标签和数据标签。

8、调整格式和修改字段标题。最终效果如下图所示。

在 Excel Power Query 未出来之前，把文件夹下所有文件合并为一个与合并同一工作表中的多个工作表，需要用 VBA 实现，比较麻烦。有了 Power Query 后，不用再写代码，直接用它就可以合并一个文件夹（可包含子文件夹）下所有的 Excel 文件与一个 Excel 文档中所有 Sheet。用 Power Query 合并文件，主要是通过查询导入的办法实现，以下就是它们的具体操作方法，实例中操作所用版本均为 Excel 2016。

一、Excel用Power Query把多个工作表Sheet合并到一个工作表

1、选择“数据”选项卡，单击“新建查询”，在弹出的菜单中依次选择“从文件”→ 从工作簿，打开“导入数据”窗口，定位到要合并的Excel文件所在的文件夹，双击要合并的文件（如 Power Query合并多个工作表），则弹出提示正在连接文件小窗口，连接完成后，打开“导航器”窗口，勾选“选择多项”，依次勾选“1月至6月”6个工作表，单击右下角的“加载”，打开“查询编辑器”窗口，选中左边的“1月”，单击“表格图标”，在弹出的菜单中选择“追加查询”，打开“追加”窗口，单击下拉列表框，在弹出的选项中选择“2月”，则把工作表“2月的数据”添加到“1月的数据”后面；同样方法添加“3月至6月的数据”，添加完成后，单击“查询编辑器”左上角的“关闭并上载”，在弹出的菜单中选择“关闭并上载”，则“1月至6月的数据”添加到 Excel 文档中；操作过程步骤，如图1所示：

提示：当从 Excel 文件导入数据时，在最后一步把数据添加到 Excel 文档时，可能会弹出“初始化数据源失败”的提示，单击“确定”即可。

2、在“查询编辑器”窗口，追加合并数据时，除可以从“表格图标”选择“追加查询”外，还可以直接选择窗口右上角的“追加查询”，如图2所示：

3、如果合并的工作表中有重复记录，把数据添加到一个表（如“1月”）后，可以单击“表格图标”，在弹出的菜单中选择“删除重复项”，如图3所示：

二、Excel用Power Query把多个文件合并成一个文件，仅把 Sheet 添加到工作薄并未合并数据

1、单击“数据”选项卡下的“新建查询”，依次选择“从文件”→ 从工作薄，打开“导入数据”窗口，定位到要合并的Excel文件所在的文件夹，双击要合并的文件（如 Power Query 合并查询），则所选文件导入到“导航器”窗口，勾选“选择多项”，依次勾选“Sheet1 和 Sheet2”，单击“编辑”，打开“查询编辑器”窗口，单击窗口右上角的“新建源”，在弹出的菜单中依次选择“文件””→ Excel，再次打开“导入数据”窗口，同样定位要合并文件所在文件夹，双击要导入文件（如 Power Query合并多个工作表），打开“导航器”窗口，再次勾选“选择多项”，并依次选择“1月至6月”六个工作表，单击“确定”，返回“查询编辑器”窗口，单击“关闭并上载”，在弹出的菜单中选择“关闭并上载”，则两个 Excel 文件的8个工作表合并到一个 Excel 文件中；操作过程步骤，如图4所示：

2、以上演示了把两个 Excel 文件合并为一个文件，如果要把更多的 Excel 文件合并为一个文件，只需在“查询编辑器”窗口重复选择“新建源”，选择 Excel 文件即可。

三、Excel用Power Query把同一文件夹下所有文件合并成一个文件，文件夹下可包含子文件夹

1、选择“数据”选项卡，单击“新建查询”，依次选择“从文件”→ 从文件夹，打开“文件夹”窗口，单击“浏览”，打开“浏览文件夹”窗口，定位到要合并的 Excel 文件所在的父文件夹，选择要合并的 Excel 文件所在文件夹，单击“确定”，打开“查询编辑器”窗口；选中第三列，按住 Shift，再选中第八列，右键选中的列，在弹出的菜单中选择“删除列”，把它们删除；选择“添加列”选项卡，单击“添加自定义列”，打开“添加自定义列”窗口，在“自定义列公式”下输入 =Excel.Workbook([Content])，单击“确定”；返回“查询编辑器”窗口，选中 Custom 列，单击 Custom 右边的双箭头图标，在打开的小窗口中，不勾选“使用原始列名作为前缀”，单击“确定”；单击 Custom.Data 列选中它，再单击 Custom.Data 右边的双箭头图标，在打开的窗口中，勾选“使用原始列名作为前缀”，单击“确定”；把第一至第四列和后三列删除；选择“开始”选项卡，单击“关闭并上载”，在弹出的菜单中选择“关闭并上载”，则所选文件夹下的全部 Excel 文件合并到一个文件；操作过程步骤，如图5所示：

2、提示：在“自定义列公式”下输入的公式 =Excel.Workbook([Content])，是区分大小写，注意不要输错。

四、Excel Power Query 不显示“多项选择”的原因及解决方法

1、Power Query 要求浏览器版本在 ie9 以上；另外，如果浏览设置了不显示图片，即没有勾选“显示图片”，如图6所示：

2、“导航器”中的“选择多项”前的复选框与“查询编辑器”中列字段右边的双箭头图标都不显示，图7是“导航器”中的“选择多项”前的复选框未显示的情况：

3、只要勾选了 ie 中的“显示图片”，它们就会显示，因此，遇到窗口显示不正常的情况不要忘了查看 ie 是否为 9 以上版本与是否勾选了显示图片。

今天分享一种不用函数，也不用SQL语句，还不用VBA代码的方法，这种方法只需要鼠标按步骤点一点就可以了！

关键步骤提示

第一步：打开查询编辑器

选择“数据——新建查询——从文件——从工作薄”：

找到要合并工作表的工作薄，确认导入：

在导航器中勾选所有工作表,然后编辑：

打开了导航编辑器：

第二步：追加查询

在导航编辑器中，选择“开始——追加查询”：

将需要合并的9个工作表添加到右侧“要追加的表”，确定：

9个工作表的数据就追加到了查询编辑器。

第三步：关闭查询编辑器，并上载数据

删除生成的多余表格，关闭工作簿查询：

完成了多个工作表的合并。

以上多个工作表合并的方法是利用EXCEL2016版本的“PowerQuery”,即数据查询。我的建议：工具还是跟上技术发展步伐的好。

从事互联网行业的小编们，经常会遇到一个问题，就是导出多个Excel表格数据，经常是多个数据合并到一个excel表格里来做数据分析，那么如何快速的合并excel表格呢？

1、把所有excel文件放在同一个文件夹里。如下图：

2、打开汇总excel，并右键单击sheet1，找到“查看代码”，单击进去。进去之后就看到了宏计算界面。如图所示：

3、然后我们把下面代码复制进去，然后找到工具栏上面的“运行”下的“运行子过程/用户窗体”，代码如下，如图所示：

Sub 合并当前目录下所有工作簿的全部工作表()Dim MyPath, MyName, AWbNameDim Wb As Workbook, WbN As StringDim G As LongDim Num As LongDim BOX As StringApplication.ScreenUpdating = FalseMyPath = ActiveWorkbook.PathMyName = Dir(MyPath & "\" & "*.xls")AWbName = ActiveWorkbook.NameNum = 0Do While MyName <> ""If MyName <> AWbName ThenSet Wb = Workbooks.Open(MyPath & "\" & MyName)Num = Num + 1With Workbooks(1).ActiveSheet.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)For G = 1 To Sheets.CountWb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)NextWbN = WbN & Chr(13) & Wb.NameWb.Close FalseEnd WithEnd IfMyName = DirLoopRange("B1").SelectApplication.ScreenUpdating = TrueMsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"End Sub

运行几十秒钟就OK啦！如果表格数据过多的话，时间会久一点。

在 Excel 中，如果要把某种产品1到12月的销量汇总，而每个月的销量为一个独立的工作表，这就需要用多重合并计算数据区域把多个表合并到数据透视表。把多个表合并到数据透视表比较简单，麻烦的是调整出想要的汇总结果。需要调整的项通常包括页、行和列，另外还需要把页下的项改名和调整顺序等。以下就是Excel用多重合并计算数据区域把多个表合并到数据透视表并调整各项以满足汇总要求的具体操作方法，实例中操作所用版本均为 Excel 2016。

一、Excel用多重合并计算数据区域把多个表合并到数据透视表

1、切换到要合并到数据透视表的第一个工作表（例如 1月），按住 Alt，按一次 D，按一次 P，打开“数据透视表和数据透视图向导”窗口，选择“多重合并计算数据区域”；单击“下一步”，来第2步，“请指定所需的页字段数目”选择“创建单页字段”；单击“下一步”，切换到添加表格区域窗口，框选“1月”表格区域，则框选的单元格区域被自动填充到“选定区域”下的输入框中，单击“添加”，则框选区域被添加到“所有区域”，继续框选其它表格的区域并添加到“所有区域”，添加完表格后，单击“下一步”；切换到“数据透视表显示位置”窗口，选择“新工作表”，单击“完成 ”，则框选的多张表格合并到数据透视表；操作过程步骤，如图1所示：

2、“页字段数目”如果选择“自定义字段”，则可以选择 1 到 4 个页字段，可以把一个表格添加一个页字段。例如：把工作表“1月”添加到“页字段1”，把工作表“2月”添加到“页字段2”；框选工作表“1月和2月”后，在“请先指定要建立在数据透视表中页字段数目”选择 2，在“字段1”下输入“1月”，在“字段2”下输入“2月”，如图2所示：

这样把表格合并到数据透视表后，“1月”在“页1”下，“2月”在“页2”下，如图3所示：

二、调整数据透视表并分类汇总

（一）调整页行列，使之显示为表格

1、把“列”从“列”的列表框拖到“行”的列表框，再把“页1”从“筛选器”拖到“列”；右键表格其中一个单元格（例如 A5），在弹出的菜单中选择“数据透视选项”，打开“数据透视选项”窗口，选择“显示”选项卡，勾选“经典数据透视表布局（启用网络中的字段拖放）”，单击“确定”，则数据透视表显示为表格形式，操作过程步骤，如图4所示：

2、其中“行”显示了服装编号，“列”显示其余三个字段，即“产品名称、价格和销量”；“页1”下面的“项1到项6”是原表格“1月到6月”各字段的计数结果。

（二）修改表头名称

1、选中“页1”所在单元格 C3，选择“分析”选项卡，选中屏幕左上角“活动字段”输入框中的“页1”，输入“月份”；选中“项1”所在单元格 C4，按住 Ctrl，单击 C4，输入“1月”，单击 C6 退出输入状态；操作过程步骤，如图5所示：

2、用同样的方法把“项2到项6”改为“2月到6月”，并把它们设为“居中”对齐，改好后如图6所示：

（三）把计数项改为求和项

1、右键 A3 单元格，在弹出的菜单中依次选择“值汇总依据”→ 求和，如图7所示：

2、则计算类型由“计数”变为“求和”，如图8所示：

3、其中“总计”是每个月销量的汇总，而对每件服装的汇总（即对服装编号的汇总）没有任何意义，因为它是把价格加销量，把它取消，方法为：右键其中一个对服装编号汇总的单元格（如 A8），在弹出的菜单中选择“分类汇总"行"”，如图9所示：

则取消对服装编号的分类汇总，如图10所示：

（四）调整字段顺序

1、选中“3月”所在的单元格 D4，把鼠标移到 D4 右边框上鼠标随即变为带箭头的十字架，按住左键，往右拖到 E 列，当粗绿线停在 E 列右边线上时放开左键，则“2月和3月”调好次序，操作过程步骤，如图11所示：

2、当“1月到6月”显示在行时，如果次序不对，也是一样的调整方法。数据透视表调整好后，对行的“总计”（例如 I7）是每件服装1到6月的总销量，对列的“总计”（例如 C44）是所有服装1月份的总销量，效果如图12所示：

一听到Excel数据多表合并计算，感觉很难，其实简单的Excel数据多表合并计算，实际上很简单的。

Excel数据多表合一的问题在工作中经常遇到，将两张表合并在在一起计算，我们想合成一张报表，怎么处理呢？

今天跟各位朋友分享下“Excel数据多表合并计算”操作步骤如下：

1、将鼠标定位在O1单元格中，然手点击【数据】选项卡下的“合并计算功能”；

2、在弹出的“合并计算”对话框中，先选择计算方式“求和”，再点击浏览旁边的“红色小箭头”按钮，

在弹出的“合并计算—引用位置”对话框中，选择左边表格中的数据；

引用位置选择

3、将“引用位置”添加到“所有引用位置"，再次选“引用位置”红色小箭头按钮

4、在弹出的“合并计算—引用位置”处选择右表的数据，将"引用位置"添加到“所有引用位置”处，勾选标签位置的“首行”和“最左列”，点击确定；

选择数据引用位置动态操作图

5、初步效果出来，左表加右表得出第3个数据表。

6、将合并计算得出的数据表格进行美化，得出最终数据表格。

今天分享的Excel多表合并计算你学会了吗？如果是跨表合并的话，选择引用位置到另一个表格提取即可操作。希望今天的分享对各位朋友在工作中有所帮助！

更多关于Office——Excel操作技巧可加入我们 群 一起交流学习！159534659

应用场景1

老板：小王啊，调查一下大家对我们人事部的服务有什么意见或建议没。小王：好的。

小王做好一份Excel调查表模板，分发下去。然后收到了100份结果文件。

应用场景2

老板：小王啊，还有5分钟我就要开会了，我们12家门店的销售情况表汇总到一起了吧。

小王应该怎么合并这些Excel文件？一个一个复制到手软吗？

合并多个Excel文件

第一步：将所有的Excel调查表文件存放在同一个文件夹下。打开一个空白Excel文件，点击“新建查询”，选择“从文件夹”中导入，然后粘贴所有Excel调查表所在路径。

第二步：在“组合”下拉菜单中选择“合并和编辑”。

第三步：选中要合并的工作表。

第四步：点击Power Query编辑器中的“关闭并上载”。

稍等片刻，所有的文件就都合并到同一个工作表啦。

可以看到表头的两行重复显示了很多遍。使用定位或筛选功能，删除多余的行即可。

当然，也可以在上述步骤4“关闭并上载”之前删除一些行。

更新数据

小王好开心，100份Excel调查表就这么轻松地合并到一起了。小丽：小王，我的调查表修改了一下，发一份新的给你吧。小王……

小王，莫急，直接在原来的文件夹下替换小丽的调查表，然后在合并后的汇总表上，右键一下，点击“刷新”即可。

合并多个Excel工作表

和合并excel文件类似，用Power Query同样可以快速完成。

第一步：打开一个空白Excel文件，点击“新建查询”，选择“从工作簿”中导入，然后打开需要汇总的Excel文件。

第二步：选中所有要合并的工作表名称，然后点击“编辑”。

第三步：按照图示的步骤，点击“追加查询”，然后将所有的工作表添加进来。

最后点击“关闭并上载”，所有工作表内容就合并到一个工作表下啦。同样的，如果原始的表格数据更新，在汇总表上刷新一下即可同步更新数据。

注意：以上步骤都基于Power Query插件，Excel2016才支持。使用低版本的Excel或WPS的朋友请查考明日的文章。

相关阅读：《多个word文档怎么合并》。

谢谢阅读，每天学一点，省下时间充实自己。欢迎点赞、评论、关注和点击头像。

昨天的文章发表了一篇在Access合并多表的方法，有不少读者是第一次接触到这个软件，对这个软件感到很陌生。没事，以后有机会，我会从头开始讲解Access。

讲Access其实是为了讲解SQL，因为在Access中，SQL更容易理解。在输入SQL语句的时候，初学者容易漏输入空格。

漏了空格就会导致运行出错。

在输入SQL语句，是允许输入多个空格，不影响结果。

说完Access，现在回到Excel中，Excel中的语句跟Access相似度90%以上。

Excel中SQL语法：

SELECT字段名称FROM[表格名称$]

表格名称后面需要加$符号，还有就是需要加[ ]。

Excel中SQL多表合并语法：

SELECT字段名称FROM[表格名称1$]UNION ALLSELECT字段名称FROM[表格名称2$]UNION ALLSELECT字段名称FROM[表格名称3$]……

格式相同的4个表格，现在要将这4个表格合并起来。

Step 01单击数据→现有连接→浏览更多。

Step 02找到指定工作簿，单击打开。

Step 03保持默认不变，单击确定。

Step 04保持默认不变，单击属性。

Step 05单击定义，在命令文本框输入语句，单击确定。

SELECT * FROM [2015年$]UNION ALLSELECT * FROM [2016年$]UNION ALLSELECT * FROM [2017年$]UNION ALLSELECT * FROM [2018年$]

Step 06保持默认不变，单击确定。

这样就将4个表格合并。

这么辛苦输入SQL合并多个工作表有什么好处？

当表格的内容有变动的时候，只要右键刷新一下，就可以自动更新，实现一劳永逸。而普通的复制粘贴，每一次变动都需要再重新复制粘贴一次，比较麻烦，而且容易出错。