使用Workbook_BeforeClose终止Application.ontime

Question

I looked through every topic I've found in here, but couldn't figure what is wrong with the below.

I am using Application.OnTime to run a Module every minutes. The problem is, when I close the worksheet, Excel reopens the sheet the next time the Macro should run.

I have attempted to use the following fix, to no avail.

Option Explicit
Dim dTime As Date

Public Function AutoRun2()
dTime = Now + TimeValue("00:01:00")
Application.OnTime dTime, "AutoClear"
End Function

Sub StopAutoRun2()
Application.OnTime dTime, "AutoRun2", , False
End Sub

and I have the following in ThisWorkbook:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call StopAutoRun
Call StopAutoRun2
End Sub

What am I doing wrong here?

Answer 1

在stop子目录中将"AutoRun2"更改为"AutoClear" ，因为这是您要停止使用False参数调度的实际宏。