本节介绍，如何使用VBA在Excel平台上进行一个简单的物流过程管理。
如果是一个小型的记账型管理，完全适用。
下图为管理主页分别有几个不同的功能按钮组成，信息录入、信息查询、资金管理、系统设置。
这其中信息录入是最常用的功能，下图为信息录入示例表单页。
信息录入完成，单击确定自动添加到工作表中保存。
表单中的字段对应着记录表字段自动提取，记录表是预先制作好的。
No.2
信息查询
信息查询里，主要以运单编号来进行查询。在文本框中输入运单号，自动搜索信息记录表，如果查找到相应运单，自动显示到列表框中，单击查询到的运单编号，右侧显示出运单信息。
系统设置
很显然上述一些操作，某些关键字段要提前进行设置，这里可以进行设置。
很重要，提前设置好，信息管理就更加方便了。
No.3
代码
Public Function GetsArr(Svalue As String)On Error Resume NextDim GArr, cRangSet w = GetSheet(infoSheetName)w.ActivateSet cell = w.Range(w.Cells(3, 2), w.Cells(w.Cells(w.Rows.Count, 2).End(xlUp).Row, 2))For Each xcell In cellIf Svalue = xcell.Value ThenSet cRang = w.Range(w.Cells(xcell.Row, 1), w.Cells(xcell.Row, w.Range("A2").End(xlToRight).Column))ReDim GArr(1 To w.Range("A2").End(xlToRight).Column)GArr = Application.WorksheetFunction.Transpose(cRang)GetsArr = GArrExit ForEnd IfNext xcellSet w = NothingSet cell = NothingSet xell = NothingEnd Function此代码为提取运单信息函数，使用中出现了一些困难，不过解决了。
本信息管理中，有些内容没有给出，如运单信息处理，是否到货，图片管理等等。
不做过多介绍了，只要有一个框架，其它内容就是一个补充的过程。
(本文源码没有传，未分享使用)
欢迎关注、收藏
---END---