【摘要】利用Excel VBA开发销售管理系统简单实用，可使销售管理自动化，可快速有效地对资金、进货、销售、库存等业务进行管理，合理控制“进、销、存”各个环节，提高资金的利用率和结算速度，实现管理的高效率、实时性、科学性、智能性，从而实现资源共享，提高企业管理水平、经济效益和竞争能力。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　【关键词】Excel VBA；销售；销售管理系统9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

 9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　一、概述9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　销售管理不仅是企业的关键而且是企业的生命线。销售涉及的角色众多繁杂，使用信息化管理工具对企业的销售物流进行全面管理是必须的，也是必然的。销售管理系统能给企业决策者和管理者提供全方位的销售流程和实时的信息查询，并且可以统计出某段时间内的产品销售量，加强对企业销售环节的全盘掌控，为企业提供一个全面的信息化平台，提高工作效率，使决策者能够完全清楚和控制销售这一和企业经济直接相关联的重要过程。笔者以某企业的销售为模型，运用Excel开发了一套销售管理系统。销售作为整个企业管理系统的一部分，是企业内部与外部市场的窗口。它收集必要的市场资料，向市场提供产品和服务。销售从产成品入库环节开始，根据订货合同和库存量发货。顾客收到货后，可能付款，也可能拒付，企业根据反馈的信息(应收款、到账款，拒付理由书等)进行销售分析，产生各种报表提供给有关部门，有关部门根据它来判断企业经营成果是否令人满意，并根据反馈的信息来重新调整企业在未来时期的经营计划。销售管理系统的应用，将从根本上解决整个商品销售业务流程效率低、处理能力差等手工操作过程中表现出的不足，方便销售商对商品资料、客户资料、销售业绩等进行高效的管理。使用该系统， 管理层可以及时查询、管理商品， 管理员工， 还可以对当前销售业绩、销售财务进行一些统计，生成统计表格，以便全面掌握商品的销售情况。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　Excel为微软Office组件之一，运用广泛，容易实现，且简单易操作，容易掌握。利用Excel VBA开发简便实用的销售管理系统，可以使企业在管理中节约成本，提高效率。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　二、系统功能分析9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(一)销售管理系统功能结构9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　基于开发背景及目标定位，将“销售管理系统”划分成基础资料、销售业务、采购业务、业务分析和统计报表5大模块。本系统支持动态的业务需求，并可方便地集成已有的企业管理资源。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(二)业务流程图9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　用户在运行本系统时，首先进入一个“系统登陆”框，输入用户名和密码，对其身份进行验证后才能进入到相应的管理模块。系统设置了用户权限，这主要起三方面的作用:其一，防止非法用户进入本系统。其二，不同的用户拥有不同的权限。其三，以某位合法用户的身份进入系统，其有关操作将被记录下来。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　1.对于一般用户， 可以查阅客户的相关资料， 从系统中查找原来录入的资料(入库) ， 并生成订单(出库)。新进一批材料时，应将其分类(产品类目管理)后输入相关信息(入库)；当用户购买产品时， 又进入到产品的销售业务管理，进行相关操作。一般用户权限不可以进行资料修改、删除等操作，只能录入相关信息。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　2.对于管理员来说，可以查看全部资料，如每天的销售情况、采购情况，以及销售员信息等，并且可以通过报表进行数据汇总分析，以便熟悉市场，帮助进行下一步决策， 同时对公司工作人员的相关资料进行管理(用户信息管理)。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　三、功能模块设计9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(一)基础资料9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　基础资料包括库存资料、客户资料、产品资料等。库存资料完成库存产品的建立、查询、修改、删除；客户资料完成客户的分类查询和添加、修改、删除；产品资料完成产品的分类查询、添加、修改、删除等。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(二)销售业务9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　销售业务包括产品销售录入、收款管理、销售查询和应收账款查询等。销售录入完成产品基本信息的录入，销售退货完成产品基本信息的修改和删除，销售查询完成产品基本信息的查询，收款管理完成产品销售款项信息的查询、修改、删除等。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(三)采购业务9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　采购业务包括采购录入、采购退货、付款录入等。在采购录入操作中，用填写入库单的形式来完成采购的入库行为；在退货操作中用填写退货单的形式来完成材料的退货；付款录入完成付款管理。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(四)业务分析9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　包括销售分析图表和采购分析图表。销售分析图表通过数据透视图和数据透视表来显示销售数据，提供分析和决策依据。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(五)统计报表9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　统计报表包括销售明细表、采购明细表、应收账款明细表、回款明细表和付款明细表。此模块包括产品销售的所有信息，库存产品、材料的物流信息，其查询、统计是全面的。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　四、系统功能模块实现9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(一)Excel表格的设计9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　分析流程图， 系统需要使用表格来存储相关的信息。表格是Excel的基础， 只有将表格框架搭建起来，才能完成子模块的编辑、实施。为方便数据的维护及数据的有效扩充，采用Excel创建工作表， 并使用Excel内嵌的VBA编辑宏，对表格进行处理，使操作简便、快捷。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　(二)功能模块实现9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　登陆模块设计。9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　打开 Microsoft Office Excel2003 中文版，执行“工具”→“宏”→“Visual Basic编辑器”，进入VBA编辑窗口，执行“插入”→“用户窗体”，创建一个登陆窗体， 对窗体设计，并把所有按钮代码编辑到代码窗口中，类的成员变量大部分与表中的字段名相同。在创建类模块的同时，进行程序的编写，如“注册”命令的实现:9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　Private Sub CommandRegidit_Click()9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　If vbCancel = MsgBox("你要进行注册吗?", 1 + 32,"注册")ThenExitSub9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　If ComboBox1 = "" Or TextBox1 = ""Then MsgBox9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　"请先正确填写你要注册的用户名及密码 ! "9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　Exit Sub9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　0 xh = InputBox ("请重复一次密码:")9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　If xh TextBox1.Text Then9Tz心结网_爱情_周公解梦_中外历史文化_十二生肖_十二星座_百家姓_财经信息_工商会计_商业信息_综合测试_短信大全_故事

　　If vbCancel MsgBox("二次密码不一致,是否重新输入!", 1 + 32,"错误") Then GoTo0ElseExitSub