excel - 如何使用 VBA 在一张表中为所有连接刷新时禁用连接刷新

Question

我有多个查询表，我不想在运行全部刷新时刷新。我知道我可以手动进入设置来做到这一点，但是太多了，我必须一直这样做。

我为整个工作表找到了一个代码，但我想让其他人仍然设置。下面是我找到的代码：

    Dim conn As Object
    For Each conn In ActiveWorkbook.Connections
        conn.ODBCConnection.EnableRefresh = False
    Next
End Sub

这是我正在谈论的特定设置的屏幕截图

标签： excelvbapowerquery

Answer 1

在连接的名称属性中使用模式。请参阅refreshwithrefreshall

    Dim conn As Object
    For Each conn In ActiveWorkbook.Connections 
        conn.RefreshWithRefreshAll = Not CBool(conn.Name LIKE "MO*")
    Next