库存管理系统请教ExcelVBA大侠

库存管理系统请教ExcelVBA大侠：

你好！

我边工作边学习花了三个月的时间，综合了高跃勋编写的《库存管理系统3.2》和伍云辉创作的《库存管理系统》（Excel2003版），本人结合企业实操改写扩容了这个《库存管理系统》。共有56张工作表，以超过了库存管理范围，有供应、生产和销售管理的部分功能，可理解为《物控管理系统》，但系统功能未完善，希望能得到大侠的指点和完善，以便企业尽快使用。

本人建议：以Excel版本为准，便于企业在实务中复制和删除数据，操作简明，快捷方便。要具备材料和成品的全方体日常需求，具体操作将材料仓和成品仓分开使用。

本系统各工作表设置及计算结果通过演示基本正确（如有错误数据是在代码未更新前的演示数据），出入库如有退货用负数表示，自动显示为负数退货单，打印页面都设置完好，工程代码未设密码，工作表保护密码为：wyh 有下列问题请求大侠完善解决：

1．主界面：是供临时使用的，希望大侠用代码超链接、打开和隐藏工作表，靠大侠完

善主界面和Protect工作表的设置及系统封装。

2．材料列表窗体：只能显示4个类别窗口，不能满足企业日常需要，一般企业的材料或成品要分八九个类别，希望大侠能扩冲解决。

3．商品信息：收货单价及时更新，在入库单保存数据时更新收货单价。我是在商品信息的收货单价列设置的函数公式（当前入库明细工作表的商品编码相同时，重复的商品编码次数金额合计除以重复的商品编码次数数量合计，乘以重复的商品编码次数，除以重复的商品编码次数，等于加权平均最新收货单价），但因函数的计算速度慢，不便于实操。希望大侠能改用工程代码执行收货单价更新。

4．申购单：现货存量列数据从月度库存表中结存数量读入。我是在申购单的现货存量列设置的函数公式（当商品编码相同时，等于月度库存表的结存数量），但在刷新月度库存工作表后，申购单的现货存量列的公式中行次变化了，需要重新修改公式才行，不实际。希望大侠能用工程代码在申购单的现货存量列计算出月度库存表的结存数量。

5．填写单据的工作表的查询功能：申购单、入库单、出库单、限领单、补料单、订货单、送货单要有指定单号查询对应明细表数据的功能。便于事后打印与核对。对于申购单、限领单、补料单、订货单根据收、发货状态，通过查询、直接修改、核对收、发货状态，在单号日期相同、不增加行次的全体下进行覆盖保存到对应的明细表中，写入修改后的数据和已收货或已发货（未修改数据不变）。

6．填写单据的工作表的单号保存：申购单、入库单、出库单、限领单、补料单、订货单、送货单保存数据在对应明细表中单号正确。同时保存到其他相关的工作表中单号自动加1，虽不碍大事，但有点不实际，希望大侠能解决。

7．各工作表字体、字号统一：各工作表正文应用宋体10号字，数字为数值型有负号显示、带千分号、显示2位小数。希望大侠能将月度库存、库存报警、供货商汇总、应付款汇总、部门汇总、订单领料汇总、订单补料汇总、订货下单汇总、应收款汇总、库存类别汇总、毛利分类汇总、毛利类别汇总工作表整齐化一。

8．相关工作表的单价、合计栏计算：月度库存表的上期单价、入库单价、出库单价、结存单价直接计算时空值出现错误值，不美观，希望大侠要用工程代码计算空值不会出现错误值。特别提示：月度库存表采用期初（年初）结存单价数量金额取数错误，应为上期（本期的上月）末结存的单价数量金额。

请大侠将月度库存、盘点表、库存报警、供货商汇总、应付款汇总、部门汇总、订单领料汇总、订单补料汇总、订货下单汇总、应收款汇总、库存类别汇总、毛利分类汇总、毛利类别汇总工作表用工程代码在末行自动增加合计栏并计算出相关列的合计数据。

9．相关工作表的查询功能：工作表查询除能按商品编码（单位名称）顺序查询外，还应具备有按选择商品编码（单位名称）查询和按指定日期查询功能。

按选择商品编码（单位名称）查询的工作表，应用组合框控件显示所有商品编码的三要素（编码、名称、规格）（单位名称的组合框控件显示一个要素就行）供使用者需要选择查询。相关的工作表有：库存明细分类、库存类别分类、供货商分类、应付款分类、部门分类、订单领料分类、订单补料分类、订货下单分类、应收款分类、毛利分类、毛利明细分类、毛利类别分类。

按指定日期查询的工作表，应在录入开始日期后，结束日期为自动计算，工作表则显示开始日期到结束日期的数据。最好不要用窗体功能查询，直接按工作表单元格录入的开始日期回车后，显示要查询期间的数据。为了工程代码编写和复制方便，开始日期统一在查询工作表的第5行C列，结束日期统一在查询工作表的第5行D列。相关的工作表有：月度库存、库存明细分类、库存类别分类、供货商分类、应付款分类、部门分类、订单领料分类、订单补料分类、订货下单分类、应收款分类、毛利分类、毛利明细分类、毛利类别分类、供货商汇总、应付款汇总、部门汇总、订单领料汇总、订单补料汇总、订货下单汇总、应收款汇总、库存类别汇总、毛利分类汇总、毛利类别汇总、[盘点表（是引用月度库存日期）]、[库存报警（是引用月度库存日期）]。

10．本期期末结存数据保存与上期期末结存数据读入：月度结转前应提示保存读入期末数据，最好是月初月末日期相符时自动保存读入，或通过保存按钮读入，才能进入下月日期。

需保存读入的工作表：月度库存期末数量金额读入到商品信息对应月份的数量金额、应付款汇总期末金额读入到供应商对应的月份金额、部门汇总期末金额读入到部门对应的月份金额、应收款汇总期末金额读入到客户对应的月份金额、库存类别汇总期末金额读入到商品类别对应的月份金额、订货下单汇总期末金额读入到订单对应的月份金额。

需读入数据的工作表：月度库存上期末数量金额从商品信息对应月份的数量金额读入、库存明细分类上期末数量金额从商品信息对应月份的数量金额读入、应付款汇总上期末金额从供应商对应的月份金额读入、应付款分类上期末金额从供应商对应的月份金额读入、部门汇总上期末金额从部门对应的月份金额读入、部门分类上期末金额从部门对应的月份金额读入、应收款汇总上期末金额从客户对应的月份金额读入、应收款分类上期末金额从客户对应的月份金额读入、库存类别汇总上期末金额从商品类别对应的月份金额读入、库存类别分类上期末金额从商品类别对应的月份金额读入、订货下单汇总上期末金额从订单对应的月份金额读入、订货下单分类上期末金额从订单对应的月份金额读入。

11．本期期末盘点数据读入更新：传统的做法是通过入库单出库单增减数据调整，现可采用将盘点表数据通过读入保存按钮直接覆盖保存到商品信息的对应月份的数量金额中。使用读入保存按钮将盘点M列N列数据覆盖保存读入到商品信息的对应月份的数量金额列。

12．月度结转数据备份与数据保存，日期更新进入下月度：系统最好采用保留全年数据便于查询历史记录；按月份进行备份，月度结转前提示检查数据。最好是月度结转时将应该读入期末数据到相关的工作表进行自动保存：月度库存期末数量金额读入到商品信息对应月份的数量金额、应付款汇总期末金额读入到供应商对应的月份金额、部门汇总期末金额读入到部门对应的月份金额、应收款汇总期末金额读入到客户对应的月份金额、库存类别汇总期末金额读入到商品类别对应的月份金额、订货下单汇总期末金额读入到订单对应的月份金额。月度结转后，日期自动进入下月系统日期。

13．年度结转更新期初基本数据和自动清除所有被保存数据工作表的全部数据及边框，日期更新进入下年度：年度结转完成月度结转功能后，保存数据进行备份。系统自动另存为增加下年度新文件，另存为进入下年度新文件后还要将上年度期末数据读入到本年度期初数据中：商品信息上年12月份的数量金额覆盖保存读入到期初数量金额、供应商上年12月份金额覆盖保存读入到期初金额、（部门上年12月份金额覆盖保存读入到期初金额）、客户上年12月份金额覆盖保存读入到期初金额、商品类别上年12月份金额覆盖保存读入到期初金额、（订单上年12月份金额覆盖保存读入到期初金额）。同时清除上年1月份至上年12月份全部数据。

随之清除所有被保存数据工作表的全部数据及边框：申购明细、入库明细、出库明细、限领明细、补料明细、订货明细、送货明细、供货商明细、应付款明细、部门明细、订单领料明细、订单补料明细、订货下单明细、应收款明细、毛利明细、毛利类别明细。开始新年度工作。

14．操作人员权限设置：最好是在文件共享联机情况下，能供使用权限不同人员同时操作使用。操作人员按岗位分工进行权限设置。具体岗位权限如下：

采购文员：主界面、商品信息、供应商、部门、商品类别、订单、申购单、申购明细、入库明细、出库明细、月度库存、库存明细分类、库存类别分类、供货商明细、供货商分类、应付款明细、应付款分类、部门明细、部门分类、盘点表、库存报警、供货商汇总、应付款汇总、部门汇总、库存类别汇总。

材料仓文员：主界面、商品信息、供应商、部门、客户、商品类别、订单、入库单、入库明细、出库单、出库明细、限领单、限领明细、补料单、补料明细、月度库存、库存明细分类、库存类别分类、应付款明细、应付款分类、部门明细、部门分类、订单领料明细、订单领料分类、订单补料明细、订单补料分类、盘点表、库存报警、应付款汇总、部门汇总、订单领料汇总、订单补料汇总、库存类别汇总。

成品仓文员：主界面、商品信息、供应商、部门、客户、商品类别、订单、入库单、入库明细、出库明细、订货单、订货明细、送货单、送货明细、月度库存、库存明细分类、库存类别分类、应付款明细、应付款分类、订货下单明细、订货下单分类、应收款明细、应收款分类、盘点表、库存报警、应付款汇总、订货下单汇总、应收款汇总、库存类别汇总。

生产文员：主界面、商品信息、部门、客户、商品类别、订单、入库明细、出库明细、限领单、限领明细、补料单、补料明细、月度库存、库存明细分类、库存类别分类、部门明细、部门分类、订单领料明细、订单领料分类、订单补料明细、订单补料分类、盘点表、库存报警、部门汇总、订单领料汇总、订单补料汇总、库存类别汇总。

销售文员：主界面、商品信息、供应商、客户、商品类别、订单、入库明细、出库明细、订货单、订货明细、送货单、送货明细、月度库存、库存明细分类、库存类别分类、订货下单明细、订货下单分类、应收款明细、应收款分类、盘点表、库存报警、订货下单汇总、应收款汇总、库存类别汇总。

仓库主管：除毛利明细、毛利分类、毛利类别明细、毛利明细分类、毛利类别分类、毛利分类汇总、毛利类别汇总工作表以外的所有功能。操作执行盘点数据读入、月度结转、年度结转功能。

主管会计：除系统管理员权限以外的所有功能。以系统管理员身份进入系统，执行权限。

15．数字证书：最好启用数字证书签名，解释设置方法及更新操作和应用使用。

需要附件上传的大侠，请与本人联系。我是Excel的爱好者，对VBA想学习一下，让大侠见笑了，能否在二个月左右烦请大侠完善后的版本回发给我，希望能得到大侠的指教。

致

礼！

                                     学生；谷克安

                                     邮箱：gukean@163.com

                                           2010-08-16