Excel VBA – macros错误 – macros可能不可用 – 自动刷新

我有一个macros启用的Excel文件，我试图创build一个macros，每2分钟运行一次函数。

以下是我的代码：

Sub macro123() Application.SendKeys ("%{A}") Application.SendKeys ("R") Application.SendKeys ("A") Call test End Sub Sub test() Application.OnTime Now + TimeValue("00:02:00"), "macro123" End Sub 

macros123在我第一次运行的时候被执行。 2分钟后，它试图再次运行，这是当我得到以下错误。

[！[在这里input图片描述] [1]] [1]

macros设置似乎是灰色的，可能是由于组织的域设置？

[！[在这里input图片描述] [2]] [2]

有没有其他办法可以让我每隔n分钟就执行一次？

Answer 1

如果你的macros在代码模块ThisWorkbook ，那么你应该指定它，包括代码模块的名字。

尝试这个：

 Application.OnTime Now + TimeValue("00:02:00"), "ThisWorkbook.macro123" ' ^^^^^^^^^^^^^^