1.工作簿中有多张工作表，A列和B列都有类似的数据，行数不同。

2.选中“汇总”表A1单元格，点击【数据】-【合并计算】。

3.左上角选择适当的运算方式，本例为“求和”。如下图所示点击选择按钮选择数据。

4.选中第一张工作表数据，并点击【添加】按钮。

5.顺序将其他工作表数据也添加进来。

6.由于原始数据第一行是标题，并且要以A列数据分类汇总，所以选中下面两个选项。

7.确定后就在“汇总”表生成了每个人的“数量”汇总求和数据。

8.如果勾选【创建指向源数据的链接】则最终返回链接数据并汇总。

9.完成汇总效果如下。

10.点击每个人旁边的加号就可以看到汇总数据是从哪张工作表的哪个单元格引用过来的。

（本文内容由百度知道网友茗童贡献）

1.需要把多个excel表都放在同一个文件夹里面，并在这个文件夹里面新建一个excel。如图所示：

2.用microsoft excel打开新建的excel表，并右键单击sheet1，找到“查看代码”，单击进去。进去之后就看到了宏计算界面。如图所示：

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

Sub 合并当前目录下所有工作簿的全部工作表()

Dim MyPath, MyName, AWbName

Dim Wb As Workbook, WbN As String

Dim G As Long

Dim Num As Long

Dim BOX As String

Application.ScreenUpdating = False

MyPath = ActiveWorkbook.Path

MyName = Dir(MyPath & "\" & "*.xls")

AWbName = ActiveWorkbook.Name

Num = 0

Do While MyName <>""

If MyName <> AWbName Then

Set Wb = Workbooks.Open(MyPath & "\" & MyName)

Num = Num + 1

With Workbooks(1).ActiveSheet

.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)

For G = 1 To Sheets.Count

Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)

Next

WbN = WbN & Chr(13) & Wb.Name

Wb.Close False

End With

End If

MyName = Dir

Loop

Range("B1").Select

Application.ScreenUpdating = True

MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"

End Sub

4.运行之后，等待10秒针左右，等运行完毕，就是合并完成之后，会有提示，点确定就可以了。查看合并后的数据，有5000多行，就是同一个文件夹里面17个excel表数据合并后的结果。效果如图所示。

（本文内容由百度知道网友茗童贡献）

快到年底了，有小伙伴提出了如何快速将12个月的数据合并到一个工作表问题，比如将每个月不同销售员不同产品的销售数据汇总到一个工作表。今天我们就来分享一个快速将多个结构相同的工作簿数据汇总到一个工作表的方法，快速简单，一键搞定，提问的小伙伴速来围观！

一、如下数据源，我们需要将12个月的产品销售数据工作簿合并到一个工作表中。

二、效果展示

三、实现步骤

1、导入VBA模块：新建一个EXCEL汇总表，将sheet1更名为“汇总表”，删除其余的工作表，按ALT+F11 调出VBA 编辑器 →在工程窗口右击选择【导入文件】→选择VBA 模块文件（快速合并工作表和工作簿.bas）→关闭VBA 编辑器。导入后可以从【开发工具】→【宏】处看到“合并工作簿”和“合并工作表”两个宏。

2、制作一键＂合并工作簿＂和一键＂合并工作表＂按钮。插入矩形，输入文字“合并工作簿”并调整文字颜色大小和对齐方式等，然后复制一个矩形，并将文字改为“合并工作表”。选中文字为“合并工作簿”的矩形，右键→指定宏→选择宏“合并工作簿”，选中文字为“合并工作表”的矩形，右键→指定宏→选择宏“合并工作表”。

３、合并1至12月的12个工作簿数据到1个工作表。单击“合并工作簿”，首先选择需要合并的所有工作簿，点【打开】，将12个月的销售表合并到EXCEL汇总表。然后复制标题行到汇总表的第一行，再单击“合并工作表”，所有工作表即汇总到汇总表中了。

我是EXCEL学习微课堂，分享EXCEL学习的小技巧，小经验。如一键合并工作表如果分享的内容对您有用，欢迎点赞、收藏、评论、转发，更多的EXCEL技能，可以关注“EXCEL学习微课堂”。 需要一键快速合并多个工作簿到工作表原文件和VBA代码的，请评论转发后私信联系我或留下您的邮箱！

把几个excel表格的内容，合并到同一张表格里面，如何操作？看小编给你演示。

第一步：把需要合并的表格放在同一个文件夹里面，然后再新建一个excel，如图：

第二步：打开“新建Excel2007”，鼠标右键单击Sheet1，选择“查看代码”并打开进去。

第三步：将下列代码粘贴进代码栏：

Sub 合并当前目录下所有工作簿的全部工作表()

Dim MyPath, MyName, AWbName

Dim Wb As Workbook, WbN As String

Dim G As Long

Dim Num As Long

Dim BOX As String

Application.ScreenUpdating = False

MyPath = ActiveWorkbook.Path

MyName = Dir(MyPath & "\" & "*.xls")

AWbName = ActiveWorkbook.Name

Num = 0

Do While MyName <>""

If MyName <> AWbName Then

Set Wb = Workbooks.Open(MyPath & "\" & MyName)

Num = Num + 1

With Workbooks(1).ActiveSheet

.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)

For G = 1 To Sheets.Count

Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)

Next

WbN = WbN & Chr(13) & Wb.Name

Wb.Close False

End With

End If

MyName = Dir

Loop

Range("B1").Select

Application.ScreenUpdating = True

MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"

End Sub

第四步：点击菜单栏的“运行”、“运行子子过程/用户窗体”，等待几秒后提示合并完成，点击确定。如图：

完成，这样就把3个表格的内容合并到同一张表格里面。

好了，如果觉得小编文章不错，欢迎关注、点赞、收藏。

excel表格之间的核对，是每个excel用户都要面对的工作难题，今天ostar带大家一起盘点一下表格核对的方法，一共6种，以后再也不用加班勾数据了。

一、使用合并计算核对

excel中有一个大家不常用的功能：合并计算。利用它我们可以快速对比出两个表的差异。

例：如下图所示有两个表格要对比，一个是库存表，一个是财务软件导出的表。要求对比这两个表同一物品的库存数量是否一致，显示在sheet3表格。

库存表：

软件导出表：

操作方法：

步骤1：选取sheet3表格的A1单元格，excel2003版里，执行数据菜单(excel2010版 数据选项卡) - 合并计算。在打开的窗口里“函数”选“标准偏差”，如下图所示。

步骤2：接上一步别关窗口，选取库存表的A2:C10（第1列要包括对比的产品，最后一列是要对比的数量），再点“添加”按钮就会把该区域添加到所有引用位置里.

步骤3：同上一步再把财务软件表的A2:C10区域添加进来。标签位置：选取“最左列”，如下图所示。

进行以上步骤后，点确定按钮，会发现sheet3中的差异表已生成，C列为0的表示无差异，非0的行即是我们要查找的异差产品。

如果你想生成具体的差异数量，可以把其中一个表的数字设置成负数。（添加一辅助列=c2*-1），在合并计算的函数中选取“求和”，即可。另外，此类题目也可以用VLOOKUP函数查找另一个表中相同项目对应的值，然后相减核对。

二、使用选择性粘贴核对

当两个格式完全一样的表格进行核对时，可以用选择性粘贴方法，如下图所示，表1和表2是格式完全相同的表格，要求核对两个表格中填的数字是否完全一致。

今天就看到一同事在手工一行一行的手工对比两个表格。star马上想到的是在一个新表中设置公式，让两个表的数据相减。可是同事核的表，是两个excel文件中表格，设置公式还要修改引用方式，挺麻烦的。

后来一想，用选择性粘贴不是也可以让两个表格相减吗？于是，复制表1的数据，选取表格中单元格，右键“选择粘贴贴” - “减”。

进行上面操作后，差异数据即露出原形。

三、使用sumproduct函数完成多条件核对

一个同事遇到的多条件核对问题，简化了一下。

如下图所示，要求核对两表中同一产品同一型号的数量差异，显示在D列。

公式：

D10=SUMPRODUCT(($A$2:$A$6=A10)*($B$2:$B$6=B10)*$C$2:$C$6)-C10

公式简介：

因为返回的是数字，所以多条件查找可以用sumproduct多条件求和来返回对应的销量。在微信平台回复 sumproduct即可查看该函数的教程。

使用VLOOKUP函数核对

star评：本例可以用SUMIFS函数替代sumproduct函数。

四、使用COUNTIF函数核对

如果有两个表都有姓名列。怎么对比这两个表的姓名哪些相同，哪些不同呢？其实解决这个问题挺简单的，但还是不断的有同学提问，所以这里有必要再介绍一下方法。

例，如下图所示，要求对比A列和C列的姓名，在B和D列出哪些是相同的，哪些是不同的。

分析：在excel里数据的核对一般可以用三个函数countif，vlookup和match函数，后两个函数查找不到会返回错误值，所以countif就成为核对的首选函数。

公式：B2 =IF(COUNTIF(D:D,A2)>0,"相同","不同")

D2 =IF(COUNTIF(A:A,D2)>0,"相同","不同")

公式说明:

1 countif是计算一个区域内（D:D），根据条件(等于A2的值)计算相同内容的个数，比如A2单元格公式意思是在D列计算“张旺财”的个数。

2 IF是判断条件(COUNTIF(A:A,D2)>0)是否成立，如果成立就是返回第1个参数的值（"相同"），不成立就返回第二个参数的值（"不同"）

兰色说：本例是在同一个表，如果不在同一个表，只需要把引用的列换成另一个表的列即可。

五、使用条件格式核对

太多的同学在微信上提问如何查找对比两列哪些是重复的，今天兰色介绍一种超简单的方法，不需要用任何公式函数，两步即可完成。

----------------操作步骤----------------------

第1步：把两列复制到同一个工作表中

第2步：按CTRL键同时选取两列区域，开始 - 条件格式- 突出显示单元格规则 - 重复值。

设置后效果如下：

注：1 此方法不适合excel2003版 ,2003版本可以用countif统计个数的方法查找重复。

2 此方法不适合同一个表中有重复项，可以删除重复项后再两表对比。

六、使用高级筛选核对

高级筛选也能核对数据？可能很多同不太相信。其实真的可以。

回答微信平台一位同学的提问：快速从一份100人的名单中筛选出指定30个人名。

分析：excel2010版本中我们可以直接选取多个项目，但如果一下子给你30个姓名让你从中挑选出来，估计要很久才能完成筛选。这时我们可以借助高级筛选来快速完成。

例：如下图所示AB两列为姓名和销量，要求，根据E列提供的姓名从A列筛选出来。

操作步骤：

选取AB列数据区域，数据 - 高级筛选 - 打开如下图高级筛选窗口，并进行如下设置。

A 列表区域为AB列区域。

B 条件区域为E列姓名区域。注意：一定要有标题，而且标题要和A列标题一样。

点击确定后，筛选即完成。如下图所示。

如果是跟数据打交道的小伙伴（财务、人事、数据分析类），一天负责十几张表格应该是正常事情，但是这十几张表格大多数结构类似，主要由于上传的部门不一样或者是分公司上传过来，当你一遍遍复制粘贴，老板在聊天软件上不停地消息催促你的汇总表。

就会有有趣的事情发生了。

嘤嘤嘤，老板真不是我的问题啊（( ▼-▼ )）

汇总神器：Power Query

解决这个问题的神器就是它：Power Query

首先这个Power Query可不是插件！他是Excel2016版本自带的一个功能，实际上呢也是微软PowerBI（可视化数据工具）的附带功能，微软的数据导入亲儿子。

Power Query可应用的场景可多了：关系型数据库、Excel、文本和XML文件,OData提要、web页面、Hadoop的HDFS等等。

【数据】菜单-右侧就是Power Query啦

而数据整合以后，就建立好数据模型，为用Excel、Power Pivot、Power View、Power Map进行进一步的数据分析做好准备。

并且这个设置都是自动化的！一次设置以后，后续右键刷新即可。

什么？你只装2007版本？老哥现在是2018年了为，不过你要使用Power Query也不是不可以，那就要去官网下载了，相关链接：

Power BI：

https://powerbi.microsoft/zh-cn/desktop/

Power Query：

http://microsoft/zh-cn/download/details.aspx?id=39379

老哥，为什么我下载了还是不行啊？

老铁，WPS可没有这个功能........

场景1：同文件，多sheet的合并

同文件，多sheet的合并，我们来设置下（文件名：表1）

表1~表4（表格格式一样，规范）

每个sheet分别是一个代销商信息，所有列是一一对应的，没有列混乱的。

那我们就新建一个新的sheet,取名“汇总表”

【菜单栏】→【数据】 →【新建查询】→【从文件】 →【从工作簿】

选择文件【表1】、“打开”后，进入【导航器】，可以看到文件中的4个sheet，勾选“选择多项”，然后勾选所需的sheet，点击右下角【加载】。

稍等片刻，右边弹出“工作簿查询”窗口后会显示刚刚导入的四个表格。

重点来了！点击【新建查询】→在下拉菜单中找到【合并查询】→选择【追加】→在追加窗中选择【三个或更多表】→选取数据→点击【确定】

这时【查询编辑器】会自动打开看到几个sheet数据已经追加在一起了。 之后点击【关闭并上载】就可以看到了最后的我们要的【汇总表】了！

表要修改数据？不要紧，在原sheet进行修改然后再汇总表进行右键刷新就可以。

要追加新的Sheet?没事，下面就教下如何快速增加心得Sheet数据，不必会去再去导入：

在汇总表中点击【数据】→【新建查询】→在下拉菜单中找到【合并查询→【编辑器】→点击【高级编辑器】

在源 = Table.Combine({表1, 表2, 表4, 表3})后面添加正确的表名就可以，比如：源 = Table.Combine({表1, 表2, 表4, 表3，表4})→完成点击左上角的【关闭并上载】

场景2：多个文件的合并

假设你的文件还是刚才那几个数据源，但是Sheet变成文件了，但是在同一个文件夹，那么就是另外一个操作方法。

注意文件夹不要有其他无关的文件，不然会影响计算。

首先新建一个表格→【数据】→【新建查询】→【从文件夹】→在弹窗中选择目标文件夹路径确定

然后点击右下角的【编辑】弹出【查询编辑器】

新建自定义列：键入公式 =Excel.Workbook([Content])

注意公式一定要一模一样，包括大小写、全半角、符号。

然后点击最后一列【确认】两次，如图所示（必须点两下确认哦！要扩展两次。）

然后我们在【转换】→【把第一行作为标题】→【地区】这一列进行筛选，取消地区的勾选，这样就不会有重复的标题出现了

最后删除无关数据列，选中地区列，按住shift键，单击代销商列，这样正确的数据源都被选中后，在列标题上右键单击【删除其他列】

完成后点击左上角的【关闭并上载】，数据就完成啦~

本次教程结束

谢谢各位观看~

如有问题可以在后台提问或者私信我

Excel | HR必备神器，员工生日自动化提醒

图表说 | 如何六步制作商业级的柱状图

图表说01-平时用的这些图表，可能会害了你

技巧 | 日常工作时必备的 Excel 技能有哪些？

施老师：

快要过年了，年前许多公司开始统计之前每月的销售表格，做一个整年的销售统计表。有的小公司的表格可能不是很多，手动就可以整好。但是对于一些需要整合大量表格的公司来说是一件很费时的事情。今天施老师就给大家分享下快速合并并计算表格方法！

一、下图中有两个表格，怎样把它们合并到一起呢，我们可以点【数据】-【数据工具】-【合并计算】。就可以了。

上面两个表格数据不是很多，但是我是做演示，所以先用的这个案例，如果碰到数据很多的表格，这个方法是再好不过了。大家不妨试一下下。

有什么疑问的大家可以在下方评论区留言给我，和施老师一起探讨，欢迎关注宁双学好网施老师！

从事互联网行业的小编们，经常会遇到一个问题，就是导出多个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数据多表合并计算，感觉很难，其实简单的Excel数据多表合并计算，实际上很简单的。

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

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

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

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

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

引用位置选择

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

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

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

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

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

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

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

在日常工作中，经常需要将相似结构或内容多个表格进行合并汇总。当数量庞大时人工进行计算比较繁琐，工作量大且易犯错，使用Excel中的“合并计算”功能可以轻松完成这项任务。

合并计算的数据源可以是同一工作表中的不同表格，也可以是同一工作簿中的不同工作表，还可以是不同工作簿中的表格。现针对第一种情形进行演示说明：

如图1所示的两个结构相同的数据表“表一”和“表二”，利用合并计算可以轻松将这两个表格进行合并，具体步骤如下。

图1 原始表

步骤1选中B10单元格，作为合并计算后结果的存放起始位置，再单击【数据】选项卡【数据工具】命令组的【合并计算】命令按钮，打开【合并计算】对话框，如图2所示。

图2 打开【合并计算】对话框

步骤2激活【引用位置】编辑框，选中“表一”的B2:D6单元格区域，然后在【合并计算】对话框中单击【添加】按钮，所引用的单元格区域地址会出现在【所有引用位置】列表框中。使用同样的方法将“表二”的F2:H6单元格区域添加到【所有引用位置】列表中。

步骤3依次勾选【首行】复选框和【最左列】复选框，然后单击【确定】按钮，即可生成合并计算结果表，如图3所示。

图3 生成合并计算结果表

注意：

1.在使用按类别合并的功能时，数据源列表必须包含行或列标题，并且在“合并计算”对话框的【标签位置】组合框中勾选相应的复选框。

2.合并的结果表中包含行列标题，但在同时选中【首行】和【最左列】复选项时，所生成的合并结果表会缺失第一列的列标题。

3.合并后，结果表的数据项排列顺序是按第一个数据源表的数据项顺序排列的。

4.合并计算过程中不能复制数据源表的格式。如果要设置结果表的格式，可以使用【格式刷】将数据源表的格式复制到结果表中。