我们有时候需要将在多个工作表的数据到同一个工作表当中，首先我们需要确认的是这些数据的格式是否具有一致性，如果所有的数据格式都是一样的，那么这个问题就非常好处理了。今天和大家分享的是一键汇总各分表数据到总表。

照例举个栗子，如下图，一个工作簿，包含多个工作表的格式都是相同，现在需要将各个分表的数据汇总到总表中，如果是你，你会怎么去做？

数据分别在不同的工作表中，每个工作表的数据格式都是一致的。

也许你会想到使用数据透视表或者合并计算等方式进行操作。但是你会发现这两种操作方式都有它的不足或者扩展性不强。比如说，当标题行或列是多行（多列）或者存在合并单元格时，也就无能无力了。

我和你说的是VBA代码来实现这个，有时候就是那么一瞬间的错过，你就不会再遇到啦！

我们首先看看，下面的动画教程：

PS:是将分表的数据汇总明细到当前活动的工作表，因此在使用时务必先在需要汇总的表中执行。

附上VBA源代码

以上就是今天要和大家分享的技巧，希望对大家有所帮助，祝各位一天好心情！

唯有不断学习，才能不被淘汰！

Excel中每一个方法都有特定的用途，不是他们没有用处，只是你不了解或者暂时用不着，建议你收藏起来，万一哪天用着呢？

继上篇大猫为大家介绍了合并多个工作簿的VBA代码之后，这篇我们继续为大家介绍一个实用的技能。

将一个excel文档中的多个工作表进行合并为一个工作表

打开要合并的工作簿

按alt+F11进入VBA工程界面

新建一个模块

复制下面的代码，然后执行即可

作用结果是：

它会新建一个叫做“汇总”的工作表，然后把当前工作簿里的所有Sheet里有数据的内容都复制到“汇总”表里。提示：如果数据表里的内容没有表头的话需要把StartRow = 2改成StartRow = 1

Function LastRow(sh As Worksheet)

On Error Resume Next

LastRow = sh.Cells.Find(what:="*", _

After:=sh.Range("A1"), _

Lookat:=xlPart, _

LookIn:=xlFormulas, _

SearchOrder:=xlByRows, _

SearchDirection:=xlPrevious, _

MatchCase:=False).Row

On Error GoTo 0

End Function

Sub MergeSheets()

Dim sh As Worksheet

Dim DestSh As Worksheet

Dim Last As Long

Dim shLast As Long

Dim CopyRng As Range

Dim StartRow As Long

Application.ScreenUpdating = False

Application.EnableEvents = False

'新建一个“汇总”工作表

Application.DisplayAlerts = False

ActiveWorkbook.Worksheets("汇总").Delete

Application.DisplayAlerts = True

Set DestSh = ActiveWorkbook.Worksheets.Add

DestSh.Name = "汇总"

'开始复制的行号，忽略表头，无表头请设置成1

StartRow = 2

For Each sh In ActiveWorkbook.Worksheets

If sh.Name <> DestSh.Name Then

Last = LastRow(DestSh)

shLast = LastRow(sh)

If shLast > 0 And shLast >= StartRow Then

Set CopyRng = sh.Range(sh.Rows(StartRow), sh.Rows(shLast))

If Last + CopyRng.Rows.Count > DestSh.Rows.Count Then

MsgBox "内容太多放不下啦！"

GoTo ExitSub

End If

CopyRng.Copy

With DestSh.Cells(Last + 1, "A")

.PasteSpecial xlPasteValues

.PasteSpecial xlPasteFormats

Application.CutCopyMode = False

End With

Next

ExitSub:

Application.GoTo DestSh.Cells(1)

DestSh.Columns.AutoFit

Application.ScreenUpdating = True

Application.EnableEvents = True

End Sub

问题来源

今天公众号后台朋友问：有没有好的方法，对比两工作表，标识出内容相同行与不同行？

韩老师给一种方法，不仅能标识内容相同行，还能把相同行快速提取出来。

这个方法就是——高级筛选。

关键步骤讲解：

1、在工作表1中标识与工作表2姓名相同的数据行

鼠标放在工作表1数据区中任意单元格，选择“数据——排序和筛选——高级”，筛选方式选择在原有区域显示筛选结果，列表区域为工作表1数据区，条件区域为工作表2姓名所有列，一定要包含“姓名”列标签。

筛选出的就是两个工作表姓名相同的内容行，给相同内容行添加背景颜色，点击“开始——筛选”，即可看到有背景颜色的就是相同行，没有背景颜色的即是姓名不同行。

同样的方法可以在工作2中操作。

2、将相同姓名行提取到新建工作表

在新建的工作表中选择“数据——排序和筛选——高级”，选择“将结果保存到其他位置”，列表区域为工作表1数据区，条件区域为工作表2姓名所有列，复制到Sheet3!$A$1，结果即是两个工作表相同姓名行。

有时候，我会相信一切有尽头，相聚离开，其实都在眨眼之间。

上篇我们刚刚说过，将Excel多工作表数据汇总到一个工作表，但是有时候我们需要将同一个工作簿里的不同工作表，分别另存为单独的工作薄；如果只是一两张工作表需要这样处理，我们手工操作复制新建粘贴保存，可如果是数量非常大，这个时候你用手工操作显得格格不入。

我们今天还是想告诉你，用VBA来处理这件事，那么你会发现这事就非常简单了，功成名就就在你眼中。

举一个例子，如下图，我们总共有5个工作表，现在需要将他们分别拆分为不同的工作薄。

我们还是惯例看看动画是如何来操作的吧！

附上Excel VBA代码：

我们可以发现其中的关闭了屏幕刷新和取消了系统信息警告，所以当我们在所选择保存文件的路径下有和当前重名工作簿时，该段代码会直接以新文件覆盖旧文件的并保存，不会发出提醒信息给到你。

以上就是今天要和大家分享的技巧，希望对大家有所帮助，祝各位一天好心情！

唯有不断学习，才能不被淘汰！

Excel中每一个方法都有特定的用途，不是他们没有用处，只是你不了解或者暂时用不着，建议你收藏起来，万一哪天用着呢？

在 Excel 中，追踪引用单元格是指用箭头标明影响当前单元格值的单元格；例如，在单元格 B2 中引用了单元格 A1 和 A2，如 B2 = A1 + A2，则 B2 引用了 A1 和 A2。追踪从属单元格是指用箭头标明受当前单元格值影响的单元格，如上例中，B2 是 A1 和 A2 的从属单元格。追踪引用单元格与从属单元格分为两种情况，一种是在当前工作簿追踪，另一种是跨工作簿追踪。以下是 Excel追踪引用单元格与追踪从属单元格的具体操作方法，含用快捷键跨工作薄追踪实例，实例操作所用版本均为 Excel 2016。

一、Excel追踪引用单元格

（一）在同一工作簿追踪引用单元格

1、选中要追踪引用的单元格，例如 E2，选择“公式”选项卡，单击“追踪引用单元格”，则从 A2 标出一条直线箭头指向 E2，双击 E2，里面有公式 =LEFT(A2,2)，说明 E2 引用了 A2；操作过程步骤，如图1所示：

2、追踪引用单元格也可以用快捷键，追踪引用单元格快捷键为：Alt + M + P，操作方法为：选中 D11 单元格，按住 Alt 键，按一次 M，按一次 P，则分别从 B2:B10 和 D2:D10 标出一条直线箭头指向 D11，双击 D11，显示公式为 =SUMIFS(D2:D10,B2:B10,"*衬衫")，公式引用了 B2:B10 和 D2:D10；操作过程步骤，如图2所示：

（二）跨工作簿追踪引用单元格

1、方法一：

A、当前工作簿为“2月”，双击 E2 单元格，显示公式为 =SUMPRODUCT(('1月'!$A$2:$A$6='2月'!$A2)*1)，公式引用了工作簿为“1月”中的 $A$2:$A$6 和引用了工作簿“2月”中的 $A2；按回车，选中 E2 单元格，单击“公式”选项卡下的“追踪引用单元格”，则从当前工作簿的 A2 标出一条蓝色的直线箭头指向 E2 和从一个表格图标标出一条黑色的虚线箭头指向 E2，表格图标代表工作簿“2月”的表格；按 Ctrl + [ 组合键，Excel 自动切换到工作簿“1月”，并标出了引用单元格 A2:A6；操作过程步骤，如图3所示：

B、从操作过程可知，如果要跨工作簿追踪引用单元格，用“追踪引用单元格”无法实现，需要用快捷键 Ctrl + [。

2、方法二：

A、选中要跨工作簿追踪引用单元格 E2，选择“公式”选项卡，单击“追踪引用单元格”，出现一条蓝色的直线箭头和一条黑色的虚线箭头指向 E2，双击表格图标右下角黑色虚线箭头的起点，打开“定位”窗口，“定位”下显示了 '[服装销量2.xlsx]1月'!$A$2:$A$6，即 E2 引用工作表“1月”的单元格，单击'[服装销量2.xlsx]1月'!$A$2:$A$6，则它被填到“引用位置”下的输入框，如图4所示：

B、单击“确定”，则自动切换到工作簿“1月”，且框选引用的单元格 A2:A6，如图5所示：

二、Excel追踪从属单元格

(一）在同一工作簿追踪从属单元格

1、方法一：用选项

A、选中 D2 单元格，选择“公式”选项卡，单击“追踪从属单元格”，则从 D2 标出一条蓝色的直线箭头和一条黑色的虚线箭头，双击蓝线箭头指向的 D11 单元格，显示公式为 =SUMIFS(D2:D10,B2:B10,"*衬衫")，说明 D11 从属 D2；操作过程步骤，如图6所示：

B、从跨工作簿追踪引用单元格的演示可知，虚线黑箭头指向的是另一个工作表引用 D2 的单元格。

2、方法二：用快捷键

选中 D3 单元格，按住 Alt 键，按一次 M，按一次 D 键，也从 D3 标出一条蓝色的直线箭头和一条黑色的虚线箭头，操作过程步骤，如图7所示：

（二）跨工作簿追踪从属单元格

选中 D2 单元格，单击“公式”选项下的“追踪从属单元格”，双击黑色虚线的箭头，打开“定位”窗口，选择'[服装销量1.xlsx]1月'!$E$2，单击“确定”，同自动切换到工作表“1月”，且选中从属 D2 的单元格 E2；操作过程步骤，如图8所示：

提示：按 Ctrl + ]，可以选中一个单元格的从属单元格。例如，选中 D2，按 Ctrl + ]，则自动选中 D2 的从属单元格 D11，如图9所示：

三、移去单元格追踪箭头

1、选中 D11 单元格，选择“公式”选项卡，单击“追踪引用单元格”给 D11 标出引用的单元格，单击“移去箭头”，则两条直线箭头被移去；再选中 D2 单元格，单击“追踪从属单元格”给 D2 标出从属单元格，再次单击“移去箭头”，则一条虚线箭头和一条蓝色箭头被移去；操作过程步骤，如图10所示：

2、移去箭头也可以用快捷键 Alt + M + A + A，按键方法为：按住 Alt，按一次 M，按两次 A。

1.如图所示，excel1，excel2里面的数据，下面设置将excel1里面的F1表格数据60改变，excel2里面的A1表格数据也跟着改变。

2.右键excel里面F1，选择复制。

3.打开excel2，在A1里面选择粘贴链接。

4.粘贴链接完成之后，数据已经实现同步，下面测试一下，将excel1里面F1的数字改变成600，点击保存。

5.然后打开excel2.发现里面的A1也从60改变成了600，这样就实现了两个表格的数据同步。

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

1.如图：需要将“十二月份工资”工作薄中的“工资”列的数值与“年终奖励”工作薄中的“奖励金额”列的数值相加，并显示在“年终奖励”工作薄中的“应发工资”列。

2.“年终奖励”工作薄中，选择C2单元格，输入“=B2+”，不要按回车确认。

3.再点“十二月份工资”工作薄中B2单元格进行选择，选择后，“年终奖励”工作薄中C2会自动写入公式“=B2+[十二月份工资.xls]Sheet1!$B$2”。这个公式也可以直接在“年终奖励”工作薄的C2单元格中输入，不过“[”、“]”不方便输入，所以建议使用平铺窗口浏览，同一界面显示打开的所以工作薄。

4.公式表示：当前工作表中的B2单元格内的数值+“十二月份工资.xls”工作薄中“Sheet1”工作表中B2单元格内的数值

引用其他工作薄的数据，格式为：[工作薄名称]工作表名称！单元格地址。

5.输入公式后按回车，显示结果。

6.因为按上述方式输入的公式为绝对引用，如果直接复制C2单元格填充至C3：C5，计算会出错，所以完成C3：C5区域的计算有以下两个办法：

一、用第二步到第四步的步骤完成C3：C5区域的计算；

二、左键双击C2单元格，删除公式中的两个“$”，公式成为“=B2+[十二月份工资.xls]Sheet1!B2”后是相对引用，再复制C2单元格填充至C3：C5即可。

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

多个Excel之间复制的时候总是拷贝不过来，是什么原因？教你3招。

引用另外一个文件的数据时，下面几个技巧你需要学会使用：

1、快速设置引用公式

输入=号，然后选取另一个excel文件中的单元格，就会设置一个引用公式。如：

=[员工打卡计算示例.xlsx]Sheet3!$A$1

如果需要引用整个表，你需要把公式中的$去掉，然后再复制公式。其实有一个很简便的方法：复制表格-选择性粘贴-粘贴链接

2、动态引用其他excel文件数据

【例】如下图所示的文件夹中，每个月份文件夹中都有一个“销信月报.xlsx”的excel文件，要求在“销售查询”的文件中实现动态查询。

操作方法：

1、在“销售查询”文件中新建各月份工作表，用上面学的粘贴链接的方法，把各月的数据从各文件夹中的销售报表中粘贴过来。

2、在销售查询表中，设置公式：

=INDIRECT(B$1&"!B"&ROW(A2))

设置完成后，就可以在查询表中动态查询各月的数据了。

3、复制工作表到另一个excel文件后的公式引用

如下图所示，A.xlsx文件的“报表”工作表移动到B.xlsx文件中后，公式并不是引用B文件的sheet2数据，而是A文件中的数据。

如果需要修改为引用B文件中的sheet2中数据，可以用替换的方法完成。

▎本文来源：兰色幻想EXCEL，作者：赵志东，会计从业考试(gaoduncy)整理发布。转载请注明作者及来源。

比如工作表1中建有一个班的学生不同科目的成绩，工作表2中建有学生通知书，上面有学生的成绩，评语，假期作业等内容，工作表2中如何引用工作表1的姓名，成绩等内容，并且工作表2的数据随工作表1的变化而变化？期待高招，谢谢！

回答这个问题，首先要理清下思路。

最少建立两张表格，第一张是源数据表，是学生的成绩表，第二张是报表，就是呈现给别人看的表。最好还应该有一张，是学生的基础信息表。因为学生重名的可能性较多，如果用学生的姓名作为唯一条件，是不合适的。但是如果是学校给的学号，就是不重复的数据，可以作为查询的条件。

基础信息表，长这样：

学生成绩表，长这样：

家长通知书是这样的：

通过输入学号，或者点击下拉三角选择学号，都可以实现对学生姓名和成绩的查询。作业内容和教师寄语，如果提前写好了也可以设置公式查询，没有的话，就可以打字打上去。

主要公式：

查询姓名用公式：

=VLOOKUP(H2,学生成绩表!B2:C5,2,0)

查询成绩用公式：

=SUMIFS(学生成绩表!$E$2:$E$13,学生成绩表!$B$2:$B$13,学生通知书!$H$2,学生成绩表!$D$2:$D$13,学生通知书!C5)

注意公式需要右拉，引用方式的变化。

右边学号是作为查询条件的，设置了数据有效性，点击下拉三角可以选择不同的学号。

具体看演示：

需要源文件的，可以关注并私信我。

海生PPT

耐心、方法、目标、效率、只为帮助你！

普通员工追求完成工作任务

优秀员工追求高效工作

卓越员工追求方法技能

混迹职场

避免不了与数据打交道

因此

也就不得不使用Excel

然而

大多数伙伴使用Excel最常用的方法便是

“加 减 乘 除”

或者

“复制 粘贴”

比如

点击A表，找到想要提取的数据，右键-复制（CTRL+C），再点击B表，找到相应的单元格，右键-粘贴（CTRL+V）。

如此操作也没错

但是效率大大降低

关键是没掌握好的方法

如果3个或者三个以上的表格

也要如此操作吗

所以告别加班

告别“复制 粘贴”

就从关注海生PPT掌握好的方法开始

今天就给大家分享2个提高效率的方法

引用不同工作表数据的

1

跨表引用

在Excel公式中,可以引用其他工作表的数据参与运算

假设

要在"出行日期"表中直接引用"表妹1""表妹2""表妹3"的数据

则公式为：=表妹1!B2

（注：此公式没有添加判断条件，要准确引用相关数据，需要对各个“表妹”中知否赴约做判断。具体判断方法后面的文章中具体分享）

这个公式中的跨表引用由工作表名称、半角叹号(1)目标单元格地址3部分组成

除了直接手动输入公式外,还可以采用在工作表上直接“点选”的模式来快速生成引用,操作

步骤如下

Step1在出行日期表的单元格中输入公式开头的“=”号。

Step2单击表妹1的工作表标签,切换到表妹1工作表,再选择B2单元格。

Step3按回撤键结束。此时就会自动完成这个引用公式

注意：

如果跨表引用的工作表名称是以数字开头,或者包含空格及以下非字母字符

则公式中的引用工作表名称需要用一对半角单引号包含。例如:=`2月`!C3

2

跨工作簿引用

在Excel公式中,还可以引用其他工作簿中的数据.

假设

在"约会记录“要引用工作簿"开房记录"的数据明细工作表的B3单元格

如果当前Exce工作窗口中同时打开了被引用工作簿,也可以采用前面所说的直接点选方式自动产生引用公式。如果被引用的工作簿当前没有被打开,引用公式中被引用工作簿的名称需要包含完整的文件路经

如公式：

=`D:\工作目录[海生的开房记录.xlsx]数据明细!$B$2

请留意其中的半角单引号的使用

方法需要多次练习才能掌握

祝你每天进步一点点

不变是更加痛苦的

一份耕耘l一份收货

好知识 乐分享

-----------商务PPT定制呈现找海生------------

转发分享你会更美

心事留言，小编答你