仓库货物库位图在Excel电子表格中的设计与实现

1、ARTIFICIAL INTELLIGENCE AND IDENTIFICATION TECHNIQUES人工智能及识别技术仓库货物库位图在Excel 电子表格中的设计与实现吕秀华（宝钢集团梅山公司培训中心，南京210039）摘要：Excel 电子表格操作简单、使用方便，为人们进行数据管理与处理提供了非常好的平台，利用它丰富的函数库及图片处理方法，设计并实现了仓库管理中库位图的自动生成。关键词：Excel 电子表格；仓库；库位号；库位图Warehouse Goods Bitmap Library Designed and Implementation in Excel SpreadsheetL

2、V Xiuhua(BaosteelGroup Meishan Company Training Center , Nanjing 210039Abstract ：Excel spreadsheet is simple,easy to use,for people to deal with data management and provides a very good plat form. In this paper, Automatic generation for bitmap library of warehouse management was designed and impleme

3、ntations rich function library and image processing method. based on it Key words ：Excel spreadsheet ; Warehouse ; No.digital library ; Bitmap library1引言Excel 电子表格是微软公司出品的Office 系列办公软件中的一个组件，可以用来制作电子表格、完成许多复杂的数据运算，进行数据的分析和预测并且具有强大的制作图表的功能。同时，它不仅仅能够方便的处理表格和进行图形分析，其更强大的功能体现在对数据的自动处理和计算，也可以根据需要把图形存放指定位

4、置的单元格。在鑫源钢铁板卷仓库管理中，板卷存放在仓库中的位置）表示，板卷由行和列的坐标表示，即用库位号（如A2-10还包括采购/钢厂资源号，捆包号，净重，毛重，规格等信息，板卷的库位号是通过仓库管理客户端录入系统输入到公司ERP 系统中，再从ERP 系统中导出详尽的板卷信息，便于板卷出库、入库的管理。从ERP 系统导出的板卷信息用Excel 电子表格管理，根据库位号，需要绘制库位图，即在电子表格相应的行和列的位置绘制一板卷图片，可以直观的看到某个位置是否有板卷或板卷已出库，便于板卷库存的管理。在没有自动绘制库位图软件之前，都是手工绘制，这样不仅用时长，而且容易造成板卷的实际存放位置与Excel

5、 电子表格中的库位图不对应，从而使信息混乱，入库、出库等管理容易出错。所以提出编制自动绘制库位图软件，利用Excel 电子表格的自动处理、计算和图形的功能，根据源数据的库位号信息制作库位图，形成源数据与库位图的一一对应。2.2实施过程本系统设计需要多张工作表，根据仓库划分的区域不同，需要工作表的个数也不同。本论文就以A 区库位图制作为例说明：A 区需要3张工作表，源数据存放在sheet1工作表中，包括采购/钢厂资源号、捆包号、规格等基本信息，如图2所示。图 12系统设计与实现根据每个仓库的不同特点，库位号编码有所不同。首先图2源数据依据sheet1工作表中的库位号生成A 区工作表的数据，如图3

6、所示。有红色“Y ”的单元格表示有板卷，比如图3作者简介：吕秀华（1971-），女，工程师，硕士，研究方向：数据库、网络安全。收稿日期： 2011-07-162011. 182009. 082.1库位号根据仓库的特点划分出几块区域，采用A 区、B 区、C 区等表示。每个区的库位由行标和列标组成。如图1所示。通常板卷存放可以分2层，那么第二层的库位号采用2A1-1等表示，即表示A1-1这个库位第二层的板卷。105电脑编程技巧与维护中，库位号为A2-1的库位有钢卷，可以直接单击单元格中的“Y ”，直接转到sheet1工作表中的相应数据信息。同样，2A2-2表示A2-2的库位第二层有板卷。如要在F

7、列显示“Y ”，需要在相应单元格内输入公式即可完成由图2中sheet1工作表数据生成图3中A 区工作表中的数据。应用的公式如下：Sheets ("A 区" .SelectRange ("B3:AJ32".Select Selection.CopySheets ("A 区库位图" .Select Range ("B3" .SelectSelection.PasteSpecial Paste:=xlPasteValues,Operation:=xlNone, SkipBlanks _:=False,Transpose:

8、=FalseSelection.Replace What:="#N/A", Replacement:="", LookAt:=xlPart,_SearchOrder:=xlByRows,MatchCase:=False,Search Format:=False,_ReplaceFormat:=FalseApplication.CutCopyMode =FalseApplication.Run " ' 梅盛跨洋库位图.xls'! InsertPic1" End Sub选中图4中的A 区库位图工作表执行“A 区库位图”宏，

9、即可生成如图4中A 区库位图工作表中的图形。图 3“=HYPERLINK("#sheet1!E" &MATCH(F$2&"-" &$A3,sheet1! $E:$E,0," Y" ”依据图3的A 区工作表中的数据生成如图4所示的库位图。需要打开VBA 编辑器，编制如下代码：Sub InsertPic1(Dim iRow As Single, j As Single, Shp As Shape, Target As RangeWith ActiveSheetFor iRow =3To 32For j =2To 3

10、6If (.Cells(iRow,j .Value =" Y" Then .Pictures.Insert ("E:库位图001.jpg".Select Set Target =.Cells (iRow,j With Selection.Top =Target.Top +1.Left =Target.Left +1.Width =Target.Width -1.Height =Target.Height -1End With End If Next Next End With End SubSub A 区库位图(' A 区库位图Macro'

11、; 宏由lxh 录制，时间:2010-4-21''（上接第63页）收合、切片、切块、旋转等分析功能，并能灵活的实现多样化图形展现和联动显示。图4A 区库位图3结语实现了鑫源钢铁仓库管理中板卷库位图在Excel 中的自动实现功能，通过对问题的分析，了解问题的难点，进行设计实现。节约了员工手工绘制库位图的大量时间，避免了数据与库位图不一致，提高了工作效率。参考文献1Excel Home 张燕. Excel 实战技巧精粹. 人民邮电出版社，2007.2Excel Home. Excel 函数与公式实战技巧精粹. 人民邮电出版社，2008.3Excel Home. Excel VBA 实战技巧精粹. 人民邮电出版社， 2008.!参考文献1王茁，顾洁. 三位一体的商务智能(BI管理、技术与应用. 北京：