当我尝试此代码时,我收到错误“此操作将取消挂起的刷新数据命令。是否继续?”
ActiveWorkbook.RefreshAll
即使我输入 Application.Wait now() + TimeValue("00:01:20")
Excel 也无法正确刷新。
最佳答案
解决方案: “转到数据选项卡,单击连接组中的连接,单击每个连接,然后单击属性,取消选中“启用后台刷新”框。” (tylerlohman@gmail.com,pcreview,2013)。
此错误可能是由于 Excel 过载造成的,但只能以这种方式报告。在尝试了所有关于“DoEvents”、“WAIT”/SLEEP”、“FOR/NEXT”循环并打开每个页面进行单独刷新的建议后,我发现,从 PCReview 网站,解决方案位于数据连接属性中,而不是VBA。
禁用所有后台刷新连接后,简单的“Activeworkbook.RefreshAll”命令就足以更新整个工作簿;我的有 29 页大,有 5 个数据连接和 7 个 SQL 数据连接。
注意:只有 SQL 数据连接允许禁用刷新。
希望这对像我一样对此问题感到头疼的人有所帮助。
关于excel - 此操作将取消挂起的刷新数据命令,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/20278363/