BeforeRefresh 事件

在刷新查询表之前产生此事件。这里的刷新包括调用 Refresh 方法引起的变化，用户的操作引起的变化和打开包含该查询表的工作簿引起的变化。

Cancel   当事件产生时为 False。如果该事件过程将本参数设为 True，则该过程执行结束之后不进行刷新。

示例

本示例在刷新查询表之前运行。

Private Sub QueryTable_BeforeRefresh(Cancel As Boolean)
    a = MsgBox("Refresh Now?", vbYesNoCancel)
    If a = vbNo Then Cancel = True
    MsgBox Cancel
End Sub