禁用";更新链接消息“;通过VBA宏打开MS Excel时
我正在做一个自动运行宏,但它有密码保护。在我删除所有密码后,它可以以不同的格式保存文件 问题是MS Excel会显示一条关于“自动更新链接”的弹出消息。我试图禁用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
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