每30秒按一下按钮vba

Question

我创建了一个表单按钮，并为其分配了一个宏。我希望每30秒按一次该表单按钮。这可能通过vba代码，？

Answer 1

这是一个X-Y问题。您的按钮调用例程（宏），因此直接调用该宏而不必每30秒按一次按钮。

您可以使用Application.OnTime。 示例代码：

Sub myMacro()

Dim a as Integer

a = dostuff()
Application.OnTime Now() + TimeValue("00:00:30"), "myMacro"   'This will cause the sub "myMacro" to execute every 30 seconds, starting when you first call it anywhere

End Sub

Answer 2

尝试使用以下代码

Sub mycode()
    MsgBox ("Hello Shajee Rehman")
    Application.OnTime Now() + TimeValue("00:00:30"), "mycode"
End Sub