excel - 通过 VBA 宏打开 MS Excel 时禁用 "update links message"

Question

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

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

因此，我正在考虑添加一些代码来避免该弹出窗口。

这是我的代码:

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

我将自动运行与密码事物代码一起放置，因为它可能对某人有所帮助。

其他数据:

办公室 2007,

Windows 服务器 2008 R2。

该消息似乎是为了保护用户的平台，但可能我们可以通过 vba 正手配置用户首选项.

感谢你们。

Answer 1

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

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