excel vba怎样实现“打开文件时跳过宏安全提示”和“工作表标签不显示”同时执行

来源:百度知道 编辑:UC知道 时间:2024/06/05 16:48:54
两段代码分别为:

Private Sub Workbook_Open()
Workbooks.Open Filename:=ThisWorkbook.FullName, UpdateLinks:=0
'打开文件时跳过宏安全提示
End Sub

Sub xxx()
ActiveWindow.DisplayWorkbookTabs = False
'工作表标签不显示
End Sub

把第二段代码放到第一段代码里后就报错,有什么办法可实现“打开文件时跳过宏安全提示”和“工作表标签不显示”同时执行?

捕捉到ThisWorkbook.FullName的窗口存在时,再调用第二段程序xxx

Dim wind As Window, lWind As Boolean

lWind = False
For Each wind In Application.Windows
If wind.Caption = ThisWorkbook.FullName Then
lWind = True
Exit For
End If
Next

If lWind = True Then
ActiveWindow.DisplayWorkbookTabs = False
End If

打开文件时跳过宏安全提示?是不是将宏的安全级另降为低?要不然宏的提示是为保护文件安全性而设的,不会跳过吧。

楼主,应该是跳过自动更新连接提示吧.