我在工作簿开放事件中使用此代码:
Private Sub Workbook_Open()
Application.AskToUpdateLinks = False
Application.DisplayAlerts = False
Myform.show vbmodeless
End Sub
如果我的工作簿包含无法更新的外部链接,我会收到一个弹出警告提示:
'This workbook contains one or more links that cannot be updated'
问题在于,在这种情况下,userform中的代码不会初始化。我可以在屏幕上看到该表单,但Private Sub UserForm_Activate()
中的代码未执行。
我假设我需要一个解决方案来抑制此弹出窗口,以便我的userform代码运行。
答案 0 :(得分:0)
在加载并运行任何宏之前显示弹出警告。
在打开工作簿之前,您应该执行Application.AskToUpdateLinks = False
。如果工作簿由另一个宏打开,则可能,否则您运气不好。
答案 1 :(得分:0)
实际上,如果我将Private Sub UserForm_Activate()
更改为Private Sub UserForm_Initialize()
,一切似乎都有效。
我想知道为什么。