Question

使用Access / Excel 2010。

此代码正在运行我无法直接访问的帐户，因此我无法处理任何Excel设置。我只是制作代码。

我正在尝试让MS Access打开一个工作簿，有时它会提示更新链接/刷新数据/等等，我想自动对此说“是”（而不是让这个过程挂断或继续陈旧数据。）

这是我现在使用的代码：

If objXLT Is Nothing Then
    Set objXLT = CreateObject("Excel.Application")
End If

Set xlWBk = objXLT.Workbooks.Open(file_name)

其中objXLT和xlWBk是对象。

如何强制它自动更新.Open？

Answer 1

从Workbooks.Open method上的dox，使用UpdateLinks属性：

指定文件中外部引用（链接）的方式，例如下面公式中的Budget.xls工作簿中对范围的引用= SUM（[Budget.xls] Annual！C10：C25）。如果省略此参数，则会提示用户指定链接的更新方式。有关此参数使用的值的详细信息，请参阅“备注”部分。如果Microsoft Excel以WKS，WK1或WK3格式打开文件且UpdateLinks参数为0，则不会创建任何图表;否则Microsoft Excel会从附加到文件的图表生成图表。

您可以提供的值：

0：打开工作簿时，不会更新外部引用（链接）。

3：打开工作簿时将更新外部引用（链接）。

在您的代码中：

Set xlWBk = objXLT.Workbooks.Open(file_name, UpdateLinks:=3)

MS Access打开Excel文件强制链接更新

1 个答案: