Outlookでメールを送信する前に確認メッセージを表示させるにはどうすればよいですか？

Author: Siluvia Last Modified: 2025-05-23

Outlookで「送信」をクリックした直後に、重要な詳細を見逃していたことに気付いたり、間違ったファイルを添付していたり、恥ずかしいミスを見つけたりしたことはありませんか？このような問題を防ぐために、Outlookを設定して、送信ボタンを押すたびに確認ダイアログを表示させることができます。これにより、実際にメールが送信される前に再度確認するチャンスを得られます。この記事では、その実現方法として簡単なVBAソリューションをご紹介します。

VBAコードを使用してメール送信前に確認メッセージを表示させる

VBAコードを使用してメール送信前に確認メッセージを表示させる

以下のVBAコードを使用すると、Outlookはメールを送信しようとするたびに確認を求め、メッセージを再確認する機会を与えてくれます。

1. 「Alt」+「F11」キーを押して、「Microsoft Visual Basic for Applications」ウィンドウを開きます。

2. VBAウィンドウで、左側にある「プロジェクトエクスプローラー」ペインを探します。「Project1 (VbaProject.OTM)」の下で「Microsoft Outlook Objects」をダブルクリックし、次に「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でメールを送信するために「送信」をクリックするたびに、確認ダイアログボックスが表示され、「このメールを送信しますか？」と尋ねられます。「OK」をクリックすると送信され、「キャンセル」をクリックするとメールに戻って編集を続けることができます。

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

📎 メールの添付ファイルを忘れる心配はありません！

重要な添付ファイルなしでメールを送信してしまうことにうんざりしていませんか？ Kutools for Outlook の強力な「添付ファイルがないメッセージを送信する際に通知」機能は、メールに特定のキーワードが含まれているのに添付ファイルがない場合に、即座にお知らせします。これにより、重要なファイルを送り忘れることがなくなります！