每日一题:还是一键合并,多个Excel文件!

快加入Excel答疑群吧,和众多高手一起讨论Excel问题

面对的问题

之前的文章中我们用VBA实现了一键合并多张报表合并的功能,前提是这些报表是在一个文件中,如果没看过的朋友,请查看2017-03-16文章:每日一题:一键多表合一,终极解决方案!

之后一直有朋友问:要是多表格是分别保存在不同的文件中,怎么合并,昨天就有个朋友说有80个文件要合并,用复制粘贴真是太痛苦了,我现在就用9个文件的合并来演示一下用VBA怎么一健合并报表,如下图,在一个文件夹中有9个文件,分别保存着不同部门的工资表,表格格式相同。

解决方案VBA

我们新建一个Excel表,名称为“合成报表”,把工资表的表头复制到第一行,保存时选择文件类型为:Excel启用宏的工作薄。

按ALT F11,调出开发工具,插入一个新的模块:模块1,在右侧输入如下图VBA代码(大家可下载示例,直接使用),注意要调整一下标题行数,和数据列数,保存。

插入一个按钮,并关联上刚才录入的VBA程序:合并报表,确定。

下面是见证奇迹的时刻:我们点击一下按钮,表格开始闪烁,过一会,数据就合并完成了,效率很高吧!

注意事项

1、文件夹中不能有无关的Excel文件;

2、各分表中不能有空表;

3、标题行数与列数要在VBA中修改好。

下载示例

点击公众号左下角,输入:下载示例,就可以看到下载地址。每日一题的示例和Office2010、Office2013、Office2016安装程序及激活工具,可自行下载。

XP操作系统只能安装Office2010,WINDOWS7三个版本都能安装,强烈建议Windows7全部升级到Office2016。

下面是Excel答疑群的二维码,扫一下吧!

(0)

相关推荐