作为预算、财务、资料员的你,是不是经常需要从一个总报表中提取数据,批量生成多张报表呢?

这里就提供一个案例:批量生成报表。

先看看效果视频

视频加载中...

再先看看需求,以下是相关的文件夹:

1、总表:也就是数据源,每一行就是一组数据,需要分别按照上面的2个模板生成2个文件,并且自动存档到相应的文件夹。

两个橙色的按钮,就是按照两个模板生成报表,需要生成哪个就点击哪个。


2、模板:这里有2个模板,要按照两个模板分别生成要收报告,并且放在下面的文件夹里面。


涂色单元格表示需要填充的,其它区域是模板自带的。

代码及说明:(只展示其中一个模板的代码,另一个类似)

代码看起来很多,是因为需要处理的单元格比较多。实际上原理很简单,只要弄明白其中一个,其他的都是类似。

本代码主要是对总报表中的每一行进行循环,然后将相应单元格的内容填入模板中,保存文件后放入相应文件夹,其中涉及到文件读写,新建等命令。

另外,Application.WorksheetFunction.RoundUp(Sheet1.Cells(i, 6).Value * 0.1, 0) 表示向上取整,提取板的和的10%(这是客户要求的),如果读者有其它百分比需求,可以灵活运用。


以上就是本教程的全部内容,欢迎在评论区讨论。