Jak získat výzvu nebo potvrzení před odesláním e-mailů v aplikaci Outlook?

Mnohokrát jste odeslali e-mail a uvědomili jste si, že vám chybí něco důležitého nebo se v e-mailu o několik sekund objeví něco špatného. Jak se vyhnout odesílání trapných e-mailů v Outlooku? Ve skutečnosti můžete znovu potvrdit odeslání e-mailu po stisknutí tlačítka Odeslat v aplikaci Outlook. Metoda v tomto článku vám pomůže problém ukázat.

Před odesláním e-mailů s kódem VBA si vyžádejte výzvu nebo potvrzení

Před odesláním e-mailů s kódem VBA si vyžádejte výzvu nebo potvrzení

Následující kód VBA vám pomůže znovu potvrdit odeslání e-mailu po stisknutí tlačítka Odeslat v aplikaci Outlook. Postupujte prosím následovně.

1. zmáčkni Další + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2. V Microsoft Visual Basic pro aplikace Okno, poklepáním otevřete ThisOutlookSession okno kódu a poté zkopírujte níže uvedený kód VBA do okna kódu.

Kód VBA: Získejte potvrzení před odesláním e-mailů v aplikaci Outlook

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim xPrompt As String
Dim xOkOrCancel As Integer
On Error Resume Next
xPrompt = "Do you want to continue sending the email?"
xOkOrCancel = MsgBox(xPrompt, vbOKCancel)
If xOkOrCancel <> vbOK Then
    Cancel = True
End If
End Sub

3. zmáčkni Další + Q klávesy pro zavření Microsoft Visual Basic pro aplikace okno.

Od této chvíle, když stisknete Odeslat Chcete-li odeslat e-mail v aplikaci Outlook, zobrazí se potvrzovací dialogové okno, jak je znázorněno na obrázku níže. Klikněte OK pro odeslání tohoto e-mailu klikněte Zrušit abyste mohli pokračovat v psaní e-mailu.