Excel 宏调用不适用于计时器，但适用于另一个宏

Question

我正在尝试让 excel 每隔 XX 秒运行一次更新。

Sub StartTesting() 
       Call RunAll_ISP   'this call works 
End Sub

Sub macro_timer() 'This sub schedules next run in XX seconds.
    Dim ScanInterval
    ScanInterval = Format(ThisWorkbook.Sheets("Configuration").Range("B5").Value, "hh:mm:ss")
    Application.OnTime Now + TimeValue(ScanInterval), "RunAll_ISP", Schedule:=True  ' !this macro call throws error!
End Sub

如果我运行 Start_testing 宏，调用就可以了。 如果我运行 ma​​cro_timer 宏，它会等待所需的秒数，然后抛出此错误：

无法运行宏“C:\location_of_file\filename.xlsm'!RunAll_ISP'。此工作簿中可能没有该宏或所有宏都可能被禁用

信任中心的宏设置设置为“启用 VBA 宏”

我做错了什么？

Answer 1

您的问题无法重现。这个简单的示例有效。 因此，由于您的程序 StartTesting 有效，这意味着宏肯定已启用，所以剩下的唯一选择是您的宏 RunAll_ISP 不存在（或命名错误）。

Option Explicit


Public Sub RunAll_ISP()
    MsgBox "I run"
End Sub


Public Sub CreateTimer()
    Application.OnTime Now + TimeValue("00:00:05"), "RunAll_ISP", Schedule:=True
End Sub