加你了【佚名】发来吧
作者有点想当然地认为：
transportCounter = weightCounter = 0
是把0赋于两个变量，实际上，VBA处理时是判断weightCounter = 0是否成立：
成立，赋值transportCounter为True(实际情况就是这样)
不成立，赋值transportCounter为False
于是，transportCounter在第一次运算时，由逻辑值变为数值型0，从而始终少了1
楼主只要把上面那句赋值语句改为：
transportCounter = 0: weightCounter = 0
即可
文件已离线发送
知道本身就可以上传附件的，何必搞得那么麻烦。
程序在哪里？
贴上来看看
不好意思 我是不懂的
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024