Sem saber o resto do seu código ou o que você está tentando fazer, isso deve responder à sua pergunta específica -
Sub test()
If Hour(Now) >= 14 And Minute(Now) >= 30 Then
'do stuff
Application.Dialogs(xlDialogSendMail).Show
End If
End Sub
Precisa de código VBA para enviar e-mail do Outlook às 14:30, se depois das 14:30 enviar imediatamente?
precisaria preceder
Application.Dialogs(xlDialogSendMail).Show
Sem saber o resto do seu código ou o que você está tentando fazer, isso deve responder à sua pergunta específica -
Sub test()
If Hour(Now) >= 14 And Minute(Now) >= 30 Then
'do stuff
Application.Dialogs(xlDialogSendMail).Show
End If
End Sub
Tags microsoft-outlook vba