1

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

问题是 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。

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

感谢你们。

4

1 回答 1

10

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

Workbooks.Open "C:\Test\WorkbookTest.xlsx",False
于 2012-10-04T20:17:38.297 回答