Question

如果运行时间太长，我需要一个跳过一行代码的方法。这是一行，任何代码。例如，这一行：

managerAlias = recip.AddressEntry.GetExchangeUser.GetExchangeUserManager.Alias

如果数据可从Outlook服务器获得，则需要0.2秒。但是数据不可用，需要很长时间> 30秒。我使用＆＃34;错误恢复下一个＆＃34;但必须等待错误发生。所以一般的问题是如果该行超过5秒执行会如何跳过一行？

Answer 1

您可以在循环中设置该代码，以便在经过一段时间后跳过它。

没有经过测试但是

myTime = now() + timevalue("00:00:03")
Do while managerAlias = null AND mytime < now()  
    managerAlias = recip.AddressEntry.GetExchangeUser.GetExchangeUserManager.Alias
loop

如果您想要不到一秒钟，请将时间值乘以小于1 （时间价值（“00:00:01”）* 0.2）

Excel VBA如果运行时太长，则跳过代码行

1 个答案: