Excel VBA：如何在不运行宏的情况下打开Excel文件但是在激活工作簿时希望运行宏？

Question

我目前在ThisWorkbook有以下子。每当我激活此工作簿时，我想运行此子“SubName”，但是当我打开文件时不希望宏运行（它当前运行“SubName”导致错误，因为数据需要大约5秒才能加载在宏功能正常之前）

谢谢！

Private Sub Workbook_Activate()

SubName

End Sub

Answer 1

尝试在SubName之前添加：

Do Until Application.Ready = True
DoEvents: Loop

Answer 2

也许您可以尝试以下代码

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