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