VBA代码修改后出现这样的错误

网络人 · 发表于 2017-12-6 16:30

zjdh 发表于 2017-12-6 16:24
合同号有重复的吗？若有重复要累加吗？

有重复的不累加，只计算一次

zjdh · 发表于 2017-12-6 22:42

帮你重写吧

合同查询.rar (134.19 KB, 下载次数: 6)

网络人 · 发表于 2017-12-7 08:33

本帖最后由网络人于 2017-12-7 08:50 编辑

zjdh 发表于 2017-12-6 22:42
帮你重写吧

能否解释一下代码的意思了，还有每个数据源工作表内“合同编号”与“实际金额”、“合同编号”与“订单数量”之间的间隔是不一样的。如：“合同编号”与“实际金额”间隔为8，“合同编号”与“订单数量”之间的间隔为15，这样的情形怎么处理，还有那个补单、品异单的数据是怎么导进去的。没有看到写的代码,具体的见附件要求的格式

zjdh · 发表于 2017-12-7 14:28

网络人发表于 2017-12-7 08:33
能否解释一下代码的意思了，还有每个数据源工作表内“合同编号”与“实际金额”、“合同编号”与“订单数 ...

合同查询（带进度条）.rar (166.71 KB, 下载次数: 2)

网络人 · 发表于 2017-12-7 17:27

zjdh 发表于 2017-12-7 14:28

LB = Array("合同编号", "时间", "实际金额", "订单数量") '列标名称能否修改不用列表名称，改用列的地址

zjdh · 发表于 2017-12-7 19:06

网络人发表于 2017-12-7 17:27
LB = Array("合同编号", "时间", "实际金额", "订单数量") '列标名称能否修改不用列表名称，改用 ...

不可以！！

网络人 · 发表于 2017-12-14 13:42

zjdh 发表于 2017-12-7 19:06
不可以！！

那个进度条150,34，33的数值是怎么来的

zjdh · 发表于 2017-12-15 13:01

本帖最后由 zjdh 于 2017-12-15 13:02 编辑

本例进度条总长度设置为450，总共3个工作表，每处理一个占三分之一，得150，百分比即33-34.

zjdh · 发表于 2017-12-15 13:05

处理数据较多时，添加进度条，不会让人感到死机一般。

网络人 · 发表于 2017-12-15 13:37

zjdh 发表于 2017-12-15 13:05
处理数据较多时，添加进度条，不会让人感到死机一般。

是的。谢谢！如果不知道要处理多少个表，怎么设置这些参数了

		自动登录	找回密码
密码			注册