此操作将取消挂起的刷新数据命令

Question

当我尝试此代码时,我收到错误"此操作将取消挂起的刷新数据command.continue？"

ActiveWorkbook.RefreshAll

即使我把Application.Wait now() + TimeValue("00:01:20")Excel 放不正确.

Answer 1

解决方案:"转到数据选项卡,单击连接组中的连接,单击每个连接并单击属性,取消选中"启用后台刷新"框." (tylerlohman @ gmail.com,pcreview,2013).

此错误可能是由Excel过载但只能以这种方式报告引起的.在尝试了所有关于'DoEvents','WAIT'/ SLEEP','FOR/NEXT'循环并打开每个页面以进行单独刷新的建议之后,我从PCReview网站上发现该解决方案是在数据连接属性中而不是VBA.

一旦禁用了所有后台刷新连接,简单的'Activeworkbook.RefreshAll'命令就足以更新整个工作簿; 我有29页大,有5个数据连接和7个SQL数据连接.

注意:只有SQL数据连接允许禁用刷新.

希望这可以帮助任何对此问题感到头疼的人,就像我一样.