我试图弄清楚如何在 Excel VBA 中使用时间延迟。
这是我想做的事情:
我在宏中有一个按钮,当我单击它时,它会发送第一封电子邮件。然后 1 小时后,我想自动发送第二封电子邮件,而无需单击另一个按钮或再次运行程序。
我有这段代码可以设置时间。然后在时间到期后,它将运行宏。我想要做的是在第一次发送后一小时内自动发送第二封电子邮件。
Private Sub Workbook_Open()
Dim sSetTimer As Date
sSetTimer = Sheets("SetTime").Cells(1, 1)
Application.OnTime TimeValue(sSetTimer), "Orayt"
End Sub
最佳答案
在第一次的基础上增加一个小时,并用它来启动第二个进程。
Application.OnTime TimeValue(sSetTimer), "Orayt"
Application.OnTime TimeValue(sSetTimer) + TimeSerial(0, 1, 0), "Orayt2"
关于vba - Excel VBA-时间延迟 : How to use Time Delay after running macro,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/32324351/