Excel 2010：使用 vba 更频繁地刷新外部数据？

【问题标题】：Excel 2010: more frequent external data refresh with vba?Excel 2010：使用 vba 更频繁地刷新外部数据？
【发布时间】：2013-09-20 12:08:55
【问题描述】：

Excel 2010 允许您以最快的设置每分钟刷新一次外部数据源：

数据 -> 属性 -> 每次刷新

在一分钟内从连接中持续更新的最佳 vba 是什么？理想情况下，我想为每个单独的连接设置刷新率，但全部刷新就足够了。

【问题讨论】：

标签： vba excel

【解决方案1】：

以下方法有效：

在本工作簿中，

Private Sub Workbook_BeforeClose(Cancel As Boolean) 
    On Error Resume Next 
    If Cancel = False Then Application.OnTime dTime, "RefreshIt", , False 
    On Error Goto 0 
End Sub 

Private Sub Workbook_Open() 
    Run "RefreshIt" 
End Sub

在一个新模块中，

Public dTime As Date 

Sub RefreshIt() 
    Sheets(1).Range("A1").QueryTable.Refresh 
    dTime = Time + TimeValue("00:00:30") 
    Application.OnTime dTime, "RefreshIt" 
End Sub

感谢以下论坛上的 Dave Hawley http://www.ozgrid.com/forum/showthread.php?t=24119

【讨论】：

+ 1 表示来源 ;)