汇总代码修改

xing_chen

老师！有表系汇总，表中写有代码，但提醒用户未定义。敬请老师赐教。谢谢

abc123281

前期绑定字典，需要勾选工具——引用里的字典项目。建议使用字典后期绑定
Set d = CreateObject("scripting.dictionary")

ykcbf1100

字典改成后期绑定即可。

xing_chen

abc123281 发表于 2023-4-24 16:01
前期绑定字典，需要勾选工具——引用里的字典项目。建议使用字典后期绑定
Set d = CreateObject("scriptin ...

谢谢老师。其他表中也是这样代码，没有这样提示。好的，我弄下。代码中还有其它问题，麻烦老师再看看

xing_chen

ykcbf1100 发表于 2023-4-24 16:05
字典改成后期绑定即可。

谢谢老师!帮忙再看看，代码还有其它问题，就是提醒字符不全。

fanyoulin

字典汇总数据以及输出我给你修改了，但后面的数据验证我没看，你根据情况适当调整下。

ykcbf1100

xing_chen 发表于 2023-4-24 16:09
谢谢老师!帮忙再看看，代码还有其它问题，就是提醒字符不全。

那要仔细查一下了。
稍等。。。

xing_chen

fanyoulin 发表于 2023-4-24 16:09
字典汇总数据以及输出我给你修改了，但后面的数据验证我没看，你根据情况适当调整下。

谢谢老师！可以帮我看看提醒字符为什么带不全吗

fanyoulin

xing_chen 发表于 2023-4-24 16:12
谢谢老师！可以帮我看看提醒字符为什么带不全吗

没看懂，z4:ac这个区域没有内容啊，你原来的代码汇总数据输出在w5:z9区间，与z4:ac也没关联，我不知道你要验证什么？

ykcbf1100

xing_chen 发表于 2023-4-24 16:09
谢谢老师!帮忙再看看，代码还有其它问题，就是提醒字符不全。

新写了一个，改代码我怕费时间更多。