1

我一直在寻找一段时间，但在这个问题上我找不到任何帮助。

我有一个共享的 Access 2007 数据库作为源。我有链接到该数据库中的表的 excel 数据透视表。我最终将有多个 excel 文件链接到数据库（和多个用户），因此，出于访问性能的原因，我想避免与数据库的剩余打开连接，即使连接是只读的。

我已经在 excel 中建立了连接，但我正在尝试编写 VBA 代码来打开与访问表的连接刷新数据透视缓存，然后删除连接。我知道我没有正确地将各个部分组合在一起。有人可以帮我吗？先感谢您。 

Sub ConnectToAccessAttempt()

Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=DB_Name.accdb;Persist Security Info=False"

ActiveWorkbook.PivotCaches(1).CommandText = "table_Name"

ActiveWorkbook.RefreshAll        

End Sub
4

0 回答 0