循环访问连接和关闭连接

Question

我有多个用户通过Excel中的查询访问MS Access数据库。

用户可以通过按下按钮来刷新查询。

如果用户刷新查询并且之后没有关闭Excel文件，则MS Access数据库将以只读方式打开。

是否可以通过将“MaintainConnection”属性设置为False来解决此问题？

我尝试了以下代码：

Sub CloseConnections()

    Dim wb As Workbook
    Dim conn As WorkbookConnection

    Set wb = ThisWorkbook

    For Each conn in wb.Connection
        conn.MaintainConnection=False
    Next 

End Sub

有多个Access连接，这就是我遍历所有连接的原因。