Как настроить запрос подтверждения перед отправкой писем в Outlook?

Когда-нибудь вы нажимали «Отправить» в Outlook, а уже через несколько секунд понимали, что забыли важные детали, прикрепили не тот файл или заметили досадную ошибку? Чтобы избежать таких неприятных ситуаций, можно настроить Outlook так, чтобы при каждом нажатии кнопки «Отправить» появлялось диалоговое окно с подтверждением. Это даст вам возможность ещё раз внимательно проверить письмо перед его фактической отправкой. В этой статье мы подробно расскажем, как легко реализовать такое решение с помощью кода VBA.

Запрос подтверждения перед отправкой писем с помощью кода VBA

---

Запрос подтверждения перед отправкой писем с помощью кода VBA

Приведённый ниже код VBA настроит Outlook так, чтобы при каждой попытке отправить письмо появлялся запрос на ваше подтверждение — это даст вам возможность ещё раз проверить сообщение.

1. Нажмите «Alt» + «F11», чтобы открыть окно Microsoft Visual Basic для приложений.

2. В окне VBA на левой панели найдите «Обозреватель проектов». В разделе «Project1 (VbaProject.OTM)» дважды щелкните по пункту «Объекты Microsoft Outlook», а затем — по «ThisOutlookSession», чтобы открыть окно редактирования кода.

3. Скопируйте и вставьте приведённый ниже код VBA в открывшееся окно:

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 this email?"
    xOkOrCancel = MsgBox(xPrompt, vbOKCancel + vbQuestion, "Confirm Email Sending")
    
    If xOkOrCancel <> vbOK Then
        Cancel = True
    End If
End Sub

4. Нажмите клавиши «Alt» + «Q», чтобы сохранить изменения и закрыть редактор VBA.

📌Результат: Теперь при каждом нажатии кнопки «Отправить» в Outlook будет появляться диалоговое окно с вопросом: «Вы действительно хотите отправить это письмо?» Нажмите «ОК», чтобы отправить письмо, или «Отмена», чтобы вернуться к редактированию.