我正在使用两本工作簿。我在一个插入数据,另一个是通过Excel查询获取此数据的一部分,因此我每次要刷新信息时都必须打开第二个,因为我正在与其他用户共享。
简而言之,我想在更新主要工作簿时远程刷新第二个工作簿,这样我就不必持续打开,刷新和关闭。
假设两个工作簿都在Dropbox的同一个文件夹中。例如。
非常感谢!
答案 0 :(得分:0)
我找到了一种方法,但它在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