Excel TIGGERE时，应用程序只能运行一次

以下代码仅在TIGGRED时运行，且此代码位于标准模块1中

                        Sub Macro1()

                            Calculate


                        End Sub


                        Sub start()

                            Application.OnTime Now + TimeValue("00:00:01"), "Macro1"

                        End Sub

---

虽然可以使用调度重复事件，但最好使用以下方法避免超时过程

Sub Macro1()
    Calculate
    Application.OnTime Now + TimeValue("00:00:01"), "Macro1"
End Sub

Sub start()
    Macro1
End Sub

---

对不起，问题是…它只运行一次