3

Excel 2010 では、外部データ ソースを 1 分に 1 回、最速の設定で更新できます。

データ -> プロパティ -> 更新頻度

1分未満の接続から継続的に更新するのに最適なvbaは何ですか? 理想的には、個々の接続ごとにリフレッシュ レートを設定したいのですが、[すべて更新] で十分です。

4

1 に答える 1

6

次の方法が機能します。

このワークブックでは、

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

于 2013-09-20T12:44:31.190 に答える