禁用Excel工作簿连接

Question

我的Excel电子表格通过共享文件夹工作。我已经创建了从基本文件到其他文件的连接。例如，客户文件与需要检索此信息并进行更新的其他一些文档相关联。问题是，当辅助文件打开时，我无法处理基本文件，因为它将在[只读]中打开，我尝试使用连接属性并发现每当外部数据引用没有被更新时我可以处理基本文件，但如果另一个用户刷新文件我搞砸了，我试过这个：

Private Sub Workbook_Open()

ActiveWorkbook.RefreshAll

Application.Wait (Now + TimeValue("0:00:05"))

ThisWorkbook.Connections("Test1").OLEDBConnection.EnableRefresh = False

End Sub

我认为它会刷新查询然后禁用连接，所以我不会得到[只读]，但我仍然得到它。

Answer 1

只是随机猜测 - 你可以试试这个：

ActiveWorkbook.ExclusiveAccess

而不是：

ThisWorkbook.Connections("Test1").OLEDBConnection.EnableRefresh = False

Answer 2

您可以尝试：

ThisWorkbook.ConnectionsDisabled