通过VBAmacros打开MS Excel时禁用“更新链接消息”

我正在做一个自动运行的macros,但它是密码保护。 我删除了所有的密码后,可以用不同的格式保存文件。

问题是MS Excel显示一个关于“自动更新链接”的Popup消息。 我试图从MS Excel选项中禁用所有设置,但对话框仍然出现。

所以,我正在考虑添加一些代码来避免这个popup。

这是我的代码:

Sub Auto_Open() Workbooks.Open "C:\Test\WorkbookTest.xlsx" ActiveWorkbook.UnprotectSharing ("galleta") ActiveSheet.Unprotect ("galleta") ChDir "C:\Users\user\Desktop\Reportes" Sheets("BES").Select ActiveSheet.Unprotect ("galleta") Sheets("BE800").Select ActiveSheet.Unprotect ("galleta") Sheets("BECM").Select ActiveSheet.Unprotect ("galleta") ActiveWorkbook.SaveAs Filename:= _ "C:\Users\user\Desktop\Reportes\test.mht", FileFormat:= _ xlWebArchive, CreateBackup:=False End Sub 

我把我的自动运行与密码的东西代码,因为它可能有助于某人。

其他数据:

  • Office 2007,
  • Windows Server 2008 R2。

该消息似乎是为了保护用户的平台,但可能是我们可以通过vbaconfiguration用户偏好正手。

感谢你们。

Workbooks.Open的第二个参数是UpdateLinks。 将其设置为False:

 Workbooks.Open "C:\Test\WorkbookTest.xlsx",False