软件:Excel
版本:2016
请问,我在excel里写了一个简单VBA,想要测试自动更新
内容如下:
Sub auto_update()
Sheets(1).Activate
Range("A1").Activate
ActiveCell.FormulaR1C1 = Now()
Application.OnTime Now + TimeValue("00:00:03"), "auto_update"
End Sub
但一执行到Application.OnTime时,就会出现
“该宏可能无法在此活页簿中使用,或者已停用所有宏”
我已经将信任中心的宏设定安全性设到最低,还是会出现同样错误
我也试过把Application.OnTime拉到外面来执行,变成两个独立宏,
Sub auto_update()
Sheets(1).Activate
Range("A1").Activate
ActiveCell.FormulaR1C1 = Now()
End Sub
sub test()
Application.OnTime Now + TimeValue("00:00:03"), "auto_update"
end sub
因为执行宏前半都没问题,都只出在Application.OnTime
请问这个Application.Ontime有什么另外要注意的地方吗?
谢谢