如何捕捉和处理"该web查询未返回任何数据"的错误

答案:1 悬赏:80 手机版

解决时间 2021-04-24 09:14

提问者网友：泪痣哥哥
2021-04-23 10:24

我们为了在公司内实时公布中行外汇汇率数据,用EXCEL导入外币数据的功能建立了一个webB查询,并指定了刷新频率,每隔几分钟就刷新一次.大部分时间都能正常工作.但有时由于网络繁忙或阻塞,会出现"该web查询未返回任何数据..."的提示框,程序停止运行.必须手动点"确定"才能工作下去很不方便.在VBA中已经执行了"ON ERROR RESUME NEXT"语句,该提示框照样出现,说明VBA并不能捕捉这个错误.怎么才能捕捉或自动处理这个错误使这个程序在无人看管下长期运行? 请各位高手指教.

我设置了语句Application.displayAlerts = False 照样弹出错误框.我也无法得到这个错误的代码.将On Error Resume next 改成 On Error Goto 0 也无济于事.每天早上要时时注视着这个程序,一有错误框出现,立即手工点"确定"取消否则程序就停止运行,不能得到正确的汇率,怎么办啊?

最佳答案

五星知识达人网友：神鬼未生
2021-04-23 11:28

这问题不标注Excel或者VBA,一不留意就忽略了
.......

设置语句让对话框不弹出即可。

Application.displayAlerts=False
你的代码
Application.displayAlerts=True

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息