为什么在重启后，代码运行正常了？

snow653124 · 发表于 2023-1-4 19:06

本帖最后由 snow653124 于 2023-1-4 19:10 编辑

word vba代码

功能是处理选区内的图片及图片下文字，插入2*1表格，将图片放cell(2,1),问题放cell(1,1)
使用selection.select 及selection.paste
因为涉及图片变换位置，所以我使用selection.inlineshapes(n)，从最后一个开始处理

如果处理3个以下的图片，代码一切正常。
直到有一天我一次性处理50张图片，发现出错了，要么是后面的几个图片正常，前面的全部只有一个表格；要么是前面只有表格图片，无文字

一直在查代码，不知道问题所在。直到我重启电脑，再运行代码，这几十张图片全部正确处理，才知道可以这样解决。

求助大佬，是代码有我不知道的关键，还是这个selection.cut本来就有BUG？

我也尝试每次处理后，都清空剪切板，但无改善。

求助

zhanglei1371 · 发表于 2023-1-5 21:41

程序跑的太快了，上个过程没结束就开始下个。需要延时。怎么延时？论坛或百度搜索下。

snow653124 · 发表于 2023-1-7 10:06

感谢
谢谢

snow653124 · 发表于 2023-1-7 10:52

zhanglei1371 发表于 2023-1-5 21:41
程序跑的太快了，上个过程没结束就开始下个。需要延时。怎么延时？论坛或百度搜索下。

使用 timer 加一个时间
撤销了对刷新的关闭
在每个cut及paste后面加延时
解决了

感谢！

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

[求助] 为什么在重启后，代码运行正常了？