Перейти к содержимому

Как получить запрос или подтверждение перед отправкой электронных писем в Outlook?

Author: Siluvia Last Modified: 2025-06-05

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

Получите запрос или подтверждение перед отправкой электронных писем с помощью кода VBA


Получите запрос или подтверждение перед отправкой электронных писем с помощью кода VBA

Следующий код VBA заставит Outlook запрашивать у вас подтверждение каждый раз, когда вы попытаетесь отправить электронное письмо, предоставляя вам возможность дважды проверить ваше сообщение.

1. Нажмите «Alt» + «F11», чтобы открыть окно «Microsoft Visual Basic for Applications».

2. В окне VBA найдите панель «Обозреватель проектов» слева. В разделе «Проект1 (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

the screenshot of step 3 about getting a prompt or confirmation before sending emails in Outlook using vba

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

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

the screenshot of result about getting a prompt or confirmation before sending emails in Outlook using vba


📎 Больше никогда не забывайте прикреплять файлы к электронным письмам!

Устали отправлять письма без важных вложений? Мощная функция Remind Me When I Send a Message That’s Missing Attachments в Kutools for Outlook мгновенно предупреждает вас, когда ваше письмо упоминает определенные ключевые слова, но не содержит вложений — гарантируя, что вы больше никогда не забудете отправить важные файлы!

🌟 Основные функции:

  • Пользовательские ключевые слова: Укажите собственные триггерные слова, такие как "файл", "счет" или "документ".
  • Мгновенные напоминания: Получайте предупреждения при нажатии на кнопку "Отправить", если ваше письмо содержит ключевые слова, но не имеет вложений.
  • Простая настройка: Быстро добавляйте или управляйте ключевыми словами с помощью простого интерфейса.
the Remind Me When I Send a Message That’s Missing Attachments feature

Лучшие инструменты для повышения продуктивности в Office

Срочные новости: Kutools для Outlook запускает бесплатную версию!

Оцените совершенно новую бесплатную версию Kutools для Outlook с более чем70 потрясающими функциями — пользуйтесь ими НАВСЕГДА! Нажмите, чтобы скачать прямо сейчас!

🤖 Kutools AI : Использует передовые технологии искусственного интеллекта для легкой работы с Email: отвечает, резюмирует, оптимизирует, расширяет, переводит и составляет письма.

📧 Автоматизация Email: Автоответчик (доступно для POP и IMAP) / Запланировать отправку писем / Авто Копия/Скрытая копия по правилу при отправке писем / Автоматическое перенаправление (Расширенное правило) / Автоматическое добавление приветствия / Автоматическое разделение писем с несколькими получателями на отдельные сообщения ...

📨 Управление Email: Отозвать письмо / Блокировать мошеннические письма по теме и другим параметрам / Удалить дубликаты писем / Расширенный Поиск / Организовать папки ...

📁 Вложения Pro: Пакетное сохранение / Пакетное открепление / Пакетное сжатие / Автосохранение / Автоматическое отсоединение / Автоматическое сжатие ...

🌟 Магия интерфейса: 😊Больше красивых и крутых Эмодзи / Напоминание о важных письмах / Сворачивайте Outlook вместо закрытия ...

👍 Мгновенные действия: Ответить всем с вложениями / Антифишинговые Email / 🕘Показать часовой пояс отправителя ...

👩🏼‍🤝‍👩🏻 Контакты и Календарь: Пакетное добавление контактов из выбранных писем / Разделить группу контактов на отдельные группы / Удалить напоминание о дне рождения ...

Мгновенно активируйте Kutools для Outlook одним кликом. Не ждите — скачайте сейчас и повысьте свою эффективность!

kutools for outlook features1 kutools for outlook features2