我有一个要打开的工作簿,但没有询问更新链接的信息,(确切的消息是:

“此工作簿包含指向其他数据源的链接。如果更新链接,Excel将尝试检索最新数据。如果不更新链接,则Excel将使用以前的信息。请注意,数据链接可用于访问并在未经您许可的情况下共享机密信息,并可能执行其他有害行为。如果您不信任此工作簿的来源,请不要更新链接。” )

我想做的是通过单击Internet Explorer中的文件打开工作簿,并更新链接,但不要求用户单击按钮进行更新。

我在工作簿的Open Event中尝试了以下代码,但未成功:

 Private Sub Workbook_Open()
     Application.DisplayAlerts = False
     Application.ScreenUpdating = False
 End Sub


我还在上面的Sub中尝试了以下代码行:

ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.FullName, Type:=xlExcelLinks
Application.ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.FullName, Type:=xlExcelLinks
Application.ActiveWorkbook.UpdateLink
Workbooks.Open ActiveWorkbook, UpdateLinks:=True
ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources, Type:=xlExcelLinks


MS Excel 2010的版本,并为具有旧版本的用户而保存到.xls文件。

您的帮助将不胜感激。预先感谢您的所有帮助。

尊敬,

罗伯特

最佳答案

以防万一这可能对将来的所有人有所帮助,以下是我的工作:

Private Sub Workbook_Activate()
   Application.AskToUpdateLinks = False

End Sub


这样可以防止在打开文件时出现“更新链接”消息框。

罗伯特

09-10 09:02
查看更多