VBA：远程刷新另一个工作簿中的查询答案

【问题标题】：VBA: Remotely refresh queries in another workbookVBA：远程刷新另一个工作簿中的查询
【发布时间】：2016-11-11 02:40:42
【问题描述】：

我正在处理两个工作簿。我在其中一个插入数据，另一个通过 Excel 查询获取部分数据，因此每次我想刷新信息时都必须打开第二个，因为我正在与其他用户共享它。

简而言之，我想在更新主工作簿时远程刷新第二个工作簿，这样我就不必不断打开、刷新和关闭。

例如，假设两个工作簿位于 Dropbox 的同一个文件夹中。

非常感谢！

【问题讨论】：

id 代码第二个在打开时刷新。
打开时已经自动刷新了
我建议澄清到目前为止您为解决问题所做的工作，以便我们更好地帮助您。你写过代码吗？这通常可以通过打开-更新-保存-关闭方法来完成，如下面的link 我还建议您阅读How to ask question of SO。
如果其他用户表已打开，您希望它更新它吗？

标签： excel vba

【解决方案1】：

我找到了一种方法，但是它在 Mac OS 中不起作用，因为不支持查询（我不知道这一点）。

对于那些可能会有所帮助的人，请在代码下方：

Sub RefreshWB()
Application.ScreenUpdating = False
ActiveWorkbook.Save
Dim wb As Excel.Workbook
Set wb = Application.Workbooks.Open(ThisWorkbook.Path & Application.PathSeparator & "workbook.xlsx")
wb.Sheets("Sheet 1").Range("A1").ListObject.QueryTable.Refresh BackgroundQuery:=False
wb.Save
wb.Close
Application.ScreenUpdating = True
End Sub

【讨论】：