Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/27.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
禁用";更新链接消息“;通过VBA宏打开MS Excel时_Vba_Excel - Fatal编程技术网

禁用";更新链接消息“;通过VBA宏打开MS Excel时

禁用";更新链接消息“;通过VBA宏打开MS Excel时,vba,excel,Vba,Excel,我正在做一个自动运行宏,但它有密码保护。在我删除所有密码后,它可以以不同的格式保存文件 问题是MS Excel会显示一条关于“自动更新链接”的弹出消息。我试图禁用MS Excel选项中的所有设置,但对话框仍然出现 所以,我想添加一些代码来避免弹出窗口 这是我的密码: Sub Auto_Open() Workbooks.Open "C:\Test\WorkbookTest.xlsx" ActiveWorkbook.UnprotectSharing ("galleta") A

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

问题是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
我把我的自动运行和密码的东西代码,因为它可能会帮助别人

其他数据:

  • Office 2007
  • WindowsServer2008R2
这条消息似乎是为了保护用户的平台,但可能是我们可以通过正手配置用户偏好


谢谢大家。

工作簿的第二个参数。Open是UpdateLinks。将其设置为False:

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

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

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