使用Application.OnTime，无法调用sub

Question

我正在尝试使用Application.OnTime重复执行任务，但无法让它运行我的Sub。这是一个小例子：

Sub HelloWorld()
Cells(1, 1) = Time
End Sub

Sub ThisWorks()
Application.OnTime Now, "HelloWorld"
End Sub

当我尝试运行它时，我得到“无法运行宏！Bok1HelloWorld，宏可能无法使用，或者所有宏都可能被停用”（粗略翻译自挪威语）。

如果我将Application.OnTime替换为Application.Run，则会打印时间。

我做错了什么？