基于Execl-VBA的一个企业工艺通知单程序设计.docx

基于Execl VBA的一个企业工艺通知单程序设计 云南通海进校 解明才 摘 要 在日常办公中，就数据处理这一块，相信大部分人首选的软件都是微软Office的Excel，不可否认，Excel的数据处理能力确实强大，不愧为微软的经典之作。但是，随着各行各业的管理数字化，对数据的处理能力要求也越来越高，明显Excel力不从心，不过VBA的出现使得Excel重新强大起来。学习一定的VBA语言以后，可以为平时的数据处理提供一个良好的开发环境，也可以自己进行程序设计。下面就一个印刷企业工艺通知单管理程序做设计说明。 关键词： Excel；VBA；数据处理；印刷企业；工艺通知单；程序设计  前 言 VBA是什么呢？VBA的全称是Visual Basic for Application。VBA是Microsoft Visual Basic的应用程序版本，它集成在office组件之中。由于VBA的出现，使Office形成了独立的编程环境。 VBA最简单的应用就是自动执行重复的操作。比如在Excel中，我们要格式化月报表，格式化表格，设置字体、添加边框等等，这些重复的操作，如果使用VBA代码的话，我们可以让过程自动化，为我们节省很多时间。VBA还可以进行复杂的数据分析对比，以及使用VBA生成一些非常漂亮的、复杂的报表和图表；除了这些，VBA还可以定制个性化用户界面。 作为Excel来说，提供了一个固定的用户界面，我们也可以借助VBA定制用户界面。VBA并不是孤立的存在于Excel等某个软件之中。VBA是集成在offic组件之中，在VBA中可以使office组件协同工作。VBA虽然不是专业的程序开发语言，但它也可以应用于Excel的二次开发，市面上也有不少商用的Excel应用程序就是使用VBA开发出来的。 问题提出 朋友在一印刷企业做平面设计，每天都要手工填写完后向车间发放多张印刷工艺通知单，而且这些印刷工艺通知单以后客户经常追加印刷数量，而工艺通知单是重复发放，就要求设计人员找以前的通知单进行发放，由于通知单数量众多，每次查找的时候很麻烦，即费时间又费人力。为了提高管理效率，朋友妥我进行设计，对所有的通知单数据进行数据化管理。主要完成的项目内容是数据录入、打印、查询、编辑、报表生成等，这其实也是一般软件的基本内容。 设计需求及方案制定 拿到企业的工艺通知单后，首先分析通知单的数据组成，如图2-1，通知单里的数据项目很多，首先考虑到使用的数据库，对于企业来说，大量的数据管理一般选用SLQ-Server，但了解后得知，该企业工艺通知单一年大概1000张左右，对于专业的数据库来说，这样的数据量算非常小，没必要选用专业数据库，又考虑到这张通知单样式企业已经用了好几年了，是用Excel2003做的，不想改变原来的样式，所以索性决定用原来的样式进行加工设计，让操作者用起来不至于感到陌生，而且Excel的单张电子表格可以保存255×65536个单元格的数据，完全可以满足企业的需要，而且考虑到后期的数据维护，Excel用户操作很熟悉，数据备份也很简单，直接拷贝一个文件就是备份，并且只要电脑里装有微软的OFFICE套装软件，程序就能运行，方便携带和传递使用，可以说，基本的小型软件开发选用EXCEL+VBA是非常不错的方案。 图2-1：原用Excel通知单 数据分析 为了提高数据录入的速度和有效性，针对这张通知单的各项数据进行进一步分析，制定完成任务的方法。 1.产品编号。由于原来企业就有自己的产品编号规则：年+月+编号，如：201404001，这规则是当年+当月+当月编号，这个编号是通知单的唯一编号，不允许重复，如果是手工录入的话很简单，但会出现重复的情况，而且进行数据查询的时候也是要对这个数据进行唯一检索，为了提高录入的效率和唯一性，决定进行程序自动编号。解决办法是用一个隐藏的单元格记录最后一条记录的编号，由系统取出现在的年和月和这个数据进行比较，如果一致则只需把末位的3位数取出加1就可以了，如果不一致，则用现在的年月加001编号重新开始本月的编号。 2.产品名称。不是唯一性，用户自由录入。 3.用户单位。用户可以自行录入，但考虑到录入的速度和名称的一致性，决定设计程序对以前录入的用户名称进行不重复模糊查询供用户选择后快速录入，也就是智能匹配。比如：用户输入“保山”，系统自动从数据库中把包含“保山”的所有不重复的单位名称以列表框的形式出现供用户选择，这样可以保证同一企业名称在库中保持一致。如下图： 图3-1：用户单位自动匹配 4.交货时间、开单时间：利用Excel自带的日历控件供用户选择，如图3-2，但交货这个时间只需要月和日，所以必须对日历进行格式化，去掉年。 图3-2：日历控件 格式化程序代码为：Format(Calendar1.Value,