子程序Workbook_Open not firing

Question

我试图在Excel中使用Workbook_Open例程在打开时执行一些检查。它位于“ThisWorkbook”中。部分。从我的调查来看，它似乎与时间问题有关，好像我重命名文件以获得“启用内容”＃39;按钮代码始终运行。如果它已经是一个trrusted文档，它就不会。

我尝试过很多问题排查步骤，例如stop，application.wait，msgbox，关闭screenupdating，然后在另一个子网内重新启用，甚至尝试过将原始的两行代码移到一个完全独立的子代码中。我还尝试先打开Excel，然后打开文档。以下是我目前得到的内容：

Private Sub Workbook_Open()
    Application.OnTime Now, "Continue_Open"
End Sub

Sub Continue_Open()
    'Application.ScreenUpdating = False
    'Application.Wait (Now + TimeValue ("00:00:01"))
    'Stop
    MsgBox "Workbook_Open called"
    'Check that VBA access is switched on
    'based on https://blogs.msdn.microsoft.com/cristib/2012/02/29/vba-how-to-programmatically-enable-access-to-the-vba-object-model-using-macros/
    Call CheckIfVBAAccessIsOn

    'Add new Reference if required.
    Call AddReference
End Sub

即使我在例程中只有stop，如果文档是可信的，它也永远不会运行。这就是为什么我觉得这可能是一个时间问题，因此我试图解决它的所有方法。所有尝试的步骤都没有区别。