如何在 Outlook 中傳送電子郵件前獲得提示或確認?
您是否曾在 Outlook 中點擊「傳送」,卻在幾秒後才發現遺漏了重要細節、附加了錯誤的檔案,或出現令人尷尬的錯誤?為避免這類狀況,您可以設定 Outlook,在每次按下「傳送」按鈕時彈出確認對話框,讓您有機會再次仔細檢查郵件內容,確認無誤後再真正送出。本文將逐步引導您透過簡單的 VBA 方法實現此功能。
使用 VBA 程式碼在傳送電子郵件前取得提示或確認
下列 VBA 程式碼會在您每次嘗試傳送電子郵件時,提示您進行確認,讓您有機會再次仔細核對郵件內容。
1. 按下「Alt」+「F11」,即可開啟「Microsoft Visual Basic for Applications」視窗。
2. 在 VBA 視窗中,於左側找到「專案總管」窗格;在「Project 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

4. 按下「Alt」+「Q」鍵,即可儲存並關閉 VBA 編輯器。
📌 結果:從現在起,在 Outlook 中點擊「傳送」寄出電子郵件時,系統將彈出確認對話方塊,詢問「您確定要繼續傳送此電子郵件嗎?」點擊「確定」即可成功傳送,點擊「取消」則返回郵件繼續編輯。

📎再也不用擔心忘記附加電子郵件附件了!
是否厭倦了寄出缺少重要附件的電子郵件?強大的當我傳送缺少附件的郵件時提醒我功能,內建於 Kutools for Outlook,只要郵件內容提及特定關鍵字卻未附加檔案,就會立即提醒您,確保您再也不會遺漏傳送重要檔案!
🌟主要功能:
- 自訂關鍵字:可自行設定觸發字詞,例如「檔案」、「發票」或「文件」。
- 即時提醒:當您在電子郵件中輸入關鍵字卻未附加檔案時,點擊「傳送」就會立即收到提醒!
- 輕鬆設定:透過簡潔直覺的介面,快速新增或管理關鍵字!

最佳 Office 生產力工具
體驗全新 Kutools for Outlook,內含 100+ 項超強功能!立即點擊下載!
🤖KUTOOLS AI:運用先進 AI 技術,輕鬆處理電子郵件——無論是回覆、摘要、優化、擴充、翻譯還是撰寫郵件,通通一鍵搞定!
📧 郵件自動化:自動答覆(支援 POP 與 IMAP)/預約寄送郵件/寄信時依規則自動抄送密送/自動轉發(高級規則)/自動加入問候語/自動將多收件人郵件拆分為個別訊息……
📨 郵件管理:撤回郵件/依主旨等條件封鎖詐騙郵件/刪除重複郵件/高級搜尋/整合文件夾……
📁 附件專業版:批次儲存/批次解除附加/批次壓縮/自動保存/自動拆離/自動壓縮……
🌟 介面魔法:😊更多精美酷炫表情符號/重要郵件來到時提醒您/最小化 Outlook 而非關閉……
👍 一鍵奇蹟:帶附件全部答復/防釣魚郵件/🕘顯示發送者當前時間時區……
👩🏼🤝👩🏻 聯絡人與行事曆:從選取的郵件中批次新增聯絡人/將聯繫人組拆分為個別群組/移除生日提醒……
用您的慣用語言暢享 Kutools — 完整支援英文、西班牙文、德文、法文、中文等 40 多種語言!
立即一鍵解鎖 Kutools for Outlook!別再等待,馬上下載,全面提升工作效率!


🚀 一鍵下載 — 立即取得所有 Office 增益集
強烈推薦:Kutools for Office(5 合 1)
一鍵下載五個安裝程式,一次完成 — Kutools for Excel、Outlook、Word、PowerPoint 與 Office Tab Pro!立即點擊下載!
- ✅ 一鍵便利:只需一次操作,即可下載全部五個安裝套件!
- 🚀 隨時應對任何 Office 任務:按需安裝所需增益集,立即提升工作效率!
- 🧰 包含:Kutools for Excel/Kutools for Outlook/Kutools for Word/Office Tab Pro/Kutools for PowerPoint