利用EXCEL VBA批量处理科目汇总表

摘 要：批量凭证装订是业务量较大单位财务基础工作的一个难题。以用友财务软件U8为例，利用Excel和VBA，通过按照预设的年、月及凭证范围，批量完成科目汇总表、凭证封面及包角的打印，以期为提高会计基础工作效率提供一种思路。

关键词：批量处理;科目汇总表;excel;VBA

0  引  言

随着IT技术的不断普及，以关系数据库为基础的管理系统在日常工作中得以广泛应用，凭证装订前的科目汇总表、凭证封面及包角填写成为会计基础工作一项必要内容，但对凭证业务量大的单位如何对该类工作进行批量处理成为一个难以解决的问题。目前较常见的解决办法有两种：一种是通过用友财务软件进行查询打印;另一种是专门开发某一管理系统的软件，根据操作结果来判分。但这两种方法存在灵活性差、开发不易的问题。

以用友U8的凭证和科目总账为例，通过取自数据库中的数据，利用Excel和VBA，按照预定的的年、月、凭证范围来批量完成这一过程。

1  相关工作簿

为完成批量处理过程，设计了sheet1（分册）、sheet7（科目汇总）两个工作表，连接分册也为凭证信息文件，科目汇总为科目汇总表查询结果，两表结构如图1、图2。

1.1  凭证信息表：sheet1（分册）

如图1所示，工作表中，B1为账务年份，B2为账务月份，B3为自动统计的凭证总册数;A列A5以下为记账凭证第几册，B列B5以下为凭证起号，C列C5以下为凭证止号。

如图2所示，工作表的第二行取自分册工作表，第三行A列为科目编码;B列为科目名称，C列为金额合计借方，D列为金额合计贷方;从第四行开始是根据用友财务软件U8数据库中的gl_accvouch表的内容统计所得。……