运行 电脑锁定时的预定时间宏

Question

背景：Windows7、Office 2010

我目前有2个宏运行通过按钮，一个宏计算和提取数据，另一个宏选择特定范围并发送电子邮件到指定的电子邮件。

我可以知道如何在我的电脑锁定时在预定时间将这 2 个宏设置为 运行 - 即（在 'switch user' 屏幕上）吗？

谢谢你，我真诚地感谢我能得到的任何帮助！

Answer 1

Sub tempo()
    tps = Now + TimeValue("00:01:00") 'your refresh rate
    Application.OnTime tps, "message_ctrl"
End Sub

Sub message_ctrl()
     Call Module1.test  'your macro
     Call tempo 'this just relaunch schedule when test() finished
End Sub

此处示例每分钟刷新一次，但您可以定义日期或任何时间。 您需要启动一次 tempo() 或 message_ctrl() 才能开始循环。也许在 workbook_open。 这里的关键是Application.OnTime函数。