Excel VBA:如何在不运行宏的情况下打开Excel文件,但要在激活工作簿时运行宏?
我目前在Excel VBA:如何在不运行宏的情况下打开Excel文件,但要在激活工作簿时运行宏?,excel,vba,Excel,Vba,我目前在本工作簿中有以下子项。每当激活此工作簿时,我都希望运行此子“子名称”,但不希望在打开文件时运行宏(它当前运行“子名称”,这会导致错误,因为加载数据大约需要5秒钟,宏才能正常工作) 谢谢 Private Sub Workbook_Activate() SubName End Sub 尝试在子名称之前添加此项: Do Until Application.Ready = True DoEvents: Loop 也许你可以试试下面的代码 Option Explicit Dim justO
本工作簿中有以下子项。每当激活此工作簿时,我都希望运行此子“子名称”,但不希望在打开文件时运行宏(它当前运行“子名称”,这会导致错误,因为加载数据大约需要5秒钟,宏才能正常工作)
谢谢
Private Sub Workbook_Activate()
SubName
End Sub
尝试在子名称之前添加此项:
Do Until Application.Ready = True
DoEvents: Loop
也许你可以试试下面的代码
Option Explicit
Dim justOpened As Boolean
Private Sub Workbook_Activate()
If justOpened Then
justOpened = False
Else
MsgBox "Activate"
' Your Sub here
End If
End Sub
Private Sub Workbook_Open()
justOpened = True
End Sub