原标题:再见Ctrl + C!合并100个Excel表格,只需30秒!
哈喽,大家好!在上篇文章《 你复制粘贴的那么认真,难怪天天加班【Excel教程】 》中,我们给大家介绍了4种拆分工作表的方法,分别是函数、透视表、高级筛选、VBA,不知道小伙伴们学习得咋样了天我们将学习合并工作表的三种方法,赶紧来看看吧!(由于合并工作表的第一种方法函数法,涉及的函数的应用相对复杂,在函数方面比较薄弱的同学,可以先看第二、三种方法,再继续学习第一种~)
步骤1:利用名称管理器把工作表名称建立为内存数组。按CTRL+F3,在弹出的“名称管理器”窗口中,点击“新建”,参照下图进行设置:
步骤4:在B2单元格中,根据分表名称,提取分表中对应位置的数据,函数如下:
=INDIRECT(CONCATENATE($A2,”!”,ADDRESS(COUNTIF($A$2:$A2,$A2)+1,COLUMN(A2))))
这三个函数其实都是常用函数,但是很多同学都不理解此时为什么用这三个函数来嵌套,我们来看看下图,估计会对同学们有所帮助。
步骤5:因为我们使用了宏表函数,所以保存时,我们要另存为.XLSM格式的文件。
【小结】
从上图中我们不难看出,如果对应的分表数据没有15行的时候,那么就会显示0;而如果对应的分表数据超出设定的15行,那么数据就会引出不全。
所以我们既要考虑最大行数的设定,做出汇总表后,还要筛选出为0的行进行删除,这样就会给我们后续的工作增加很多操作的步骤。
02
各个分表合并到总表——PQ流
在EXCEL2016中PQ是自带的,如下图:
步骤2:在“主页”选项卡中,点选“新建源”——“文件”——“EXCEL”,在弹出的“导入数据”窗口中,按路径找到需要合并分表的源文件,点击“导入”按钮,弹出“导航器”窗口;
步骤6:保留下汇总的工作表,删除其他的工作表,任务就完成了。
【小结】
没有复杂的函数,所有的操作只需要鼠标点击即可完成,是不是很方便,那么以后如果有再多的工作表合并的问题,都是分分钟搞定了吧。
03
各个分表合并到总表——VBA流
“没有完美的方法,只有完美的操作体系”。EXCEL带给我们的好像就是这么一个完美的操作体系,永远都是“一题多解”,如果当你既不想费劲去写函数,还想一劳永逸的合并工作表,那就采用VBA的方式来处理。
按ALT+F11组合键打开VBE界面,新建“模块1”,在代码区域输入下面的代码,操作一波看看吧。

Sub合并工作表
Sheets( “汇总”).Range( “A2:J65000”).ClearContents
For Each sh In Worksheets
If sh.Name <> “汇总”Then
a = Sheets( “汇总”).Range( “A65000”).End( 3).Row + 1
b = sh.Range( “A65000”).End( 3).Row
sh.Range( “A2:J”& b).Copy Sheets( “汇总”).Cells(a, 1)
End If
Next
End Sub
代码中的Range是单元格区域对象的书写方式,括 中的J代表数据区域的末列,同学们如果操作自己的表格的时候,可以改成自己数据的末列列标,并把代码中的“汇总”改为自己汇总表的名称,即可。
【编后语】
同工作薄的“拆分工作表”和“合并工作表”的方法给大家列举了很多很多,在实际工作中,无论你掌握了哪种方法都可以让你有的放矢的去做,最怕的就是你没有一个方法傍身,那就真的无从下手了。返回搜狐,查看更多
文章知识点与官方知识档案匹配,可进一步学习相关知识C技能树首页概览113466 人正在系统学习中 相关资源:Umi-OCR 批量图片转文字工具离线批量文字识别(图片转文字)软件.rar
声明:本站部分文章及图片源自用户投稿,如本站任何资料有侵权请您尽早请联系jinwei@zod.com.cn进行处理,非常感谢!