今天要讲的例子涉及入库、出库的汇总
问题如下：
解决的思路如下：
代码运行的结果如下：
代码如下:
代码解析
1：2~4行 dim定义变量；
2：5行 后期绑定字典；
3：6~22行 处理 系统表2 工作表；
4：10行 读取日期的天数及物品名称；
5：11~19行 先判断入库数据是否为空，如果为空则数组统计入库数据，否者统计出库的数据；
6：24~48行 处理 易耗品明细表 工作表；
7：28~32行 由于存在 8号 18号等天数数据，为了更准确的提出天数，所以需要判断日期的长度，然后提取相应的日期及物品名称；
8：33~37行 查找字典，然后提取相应的数据；
9：40~44行 遍历已放入的数据，对数量及金额数据进行汇总；
10：46~47行 清空目标工作表的内容。并写入数组。
私信 视频 可以获取54集VBA入门视频
私信 VBA或 vba 可以获取文章中含VBA代码的Excle文件
分享到:
閱讀更多 浮雲Excel分享 的文章
