强制 Outlook 在特定时间或之后发送邮件

Question

需要 VBA 代码在下午 2:30 发送 Outlook 电子邮件，如果下午 2:30 之后立即发送？

它需要先于

Application.Dialogs(xlDialogSendMail).Show

Answer 1

如果您不知道其余代码或您正在尝试做什么，这应该可以回答您的具体问题 -

Sub test()
If Hour(Now) >= 14 And Minute(Now) >= 30 Then
'do stuff
  Application.Dialogs(xlDialogSendMail).Show
End If
End Sub