用vba实现一个简单的工资系统

项目原型，小工厂中将考勤汇总，基本工资，实得工资混在了一起，然后生成两份工资表，一份汇总表，再另一份工资单，一份工资表是员工看到的员工所得工资表，另一份是管理人员看到的公司所付工资表（员工所得加上公司承担的各项费用），由于几乎所有的计算都是手工填入，因此两份工资表加上了一个验证命令，检查两份表的关键几个值相同，才能确认工资表填写的正确无误。初次接触到这份表单几乎让自己崩溃，几乎纯手工，干脆用word算了。万一员工人数有所变动，所有的表就得重新再来一次了。

初步考虑如下方案：

1、设立几个基本表，由这个基本表创建出另外4个表，员工所得表，公司所付表，总表，工资单，并将此4个表存于一个工作薄中，以年月为单位，形如"2013年4月实际工资表.xls".

２、由于基本工资表也是在不断的变动中的，考虑到程序有可能重新生成前几个月的数据以便核对，基本工资表每个月备份一次，在基本工资表中以月为表名插入其后，生成的工作薄形如“2013年基本工资表.xls”，内有最多13张表，一张为基本表，另外的是每月备份表。

３、至于考勤汇总，则是以年为单位生成工作薄，每个工作薄中以月为单位最多12张工作表。

实际操作如下：

１、考勤汇总由考勤系统自动完成或是手工填写，基本工资表根据当月人数实际情况进行人员增减或是薪水的调整

２、在基本工资表中有一按钮，点击按钮，则跳出对话框，要求载入考勤汇总表，并且要求指定月份，然后检查填入的月份基本工资有没有备份，若无备份，则先生成工资表备份，并生成实际工资表中的４个分表，工作完成。

 

嗯，这是工资系统的初步想法，即在数据足够的情况下一键完成，免去每月的繁琐工作。