Outlook VBAで添付ファイルの有無をチェックして誤送信を防ぐ方法

2025.02.272026.01.27

皆さん、メールを送信した後で「添付ファイルを忘れてしまった！」と焦った経験はありませんか？特に大切な書類を送る際には、添付漏れは避けたいものです。今回は、Outlookでメールを送信する前に、VBA（Visual Basic for Applications）を使って添付ファイルの有無を自動的にチェックし、誤送信を防ぐ方法をご紹介します。

Outlook VBAとは？
添付ファイルの有無をチェックする仕組み
VBAコードの設定手順
よくある質問や疑問
1. Q1. このマクロはすべてのメールに対して動作しますか？
2. Q2. マクロが正しく動作しない場合、どうすればよいですか？
まとめ

Outlook VBAとは？

Outlookのイメージ

まず、Outlook VBAについて簡単に説明します。VBAとは、MicrosoftのOffice製品に組み込まれているプログラミング言語で、Outlookの操作を自動化することができます。これにより、日々のメール作成や送信時のチェックなどを効率化できます。

添付ファイルの有無をチェックする仕組み

では、具体的にどのようにして添付ファイルの有無をチェックするのでしょうか。ポイントは以下の通りです

ここがポイント！

メールの件名や本文に「添付」という言葉が含まれているか確認する。
「添付」という言葉があるのに、実際にはファイルが添付されていない場合、警告メッセージを表示する。

この仕組みにより、添付漏れを未然に防ぐことができます。

このサイトをチップで応援

￥100ありがとう￥300助かった！￥1,500神記事！

VBAコードの設定手順

それでは、具体的な設定手順を見ていきましょう。

1. 開発タブの表示

OutlookでVBAを使用するには、まず「開発」タブを表示する必要があります。

Outlookを開き、左上の「ファイル」タブをクリックします。
「オプション」を選択し、表示されたウィンドウで「リボンのユーザー設定」をクリックします。
右側の「メインタブ」一覧から「開発」にチェックを入れ、「OK」をクリックします。

これで、リボンに「開発」タブが表示されます。

2. VBAエディターの起動

次に、VBAエディターを起動します。

「開発」タブをクリックし、「Visual Basic」を選択します。
VBAエディターが開いたら、左側の「プロジェクト」ウィンドウで「ThisOutlookSession」をダブルクリックします。

3. コードの入力

以下のコードを「ThisOutlookSession」に貼り付けます。

vba

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    ' 件名と本文を取得

    Dim subject As String

    Dim body As String

    subject = Item.Subject

    body = Item.Body
    ' 添付ファイルの数を取得

    Dim attachmentCount As Integer

    attachmentCount = Item.Attachments.Count

' 件名または本文に「添付」という文字が含まれているか確認 If InStr(subject, "添付") > 0 Or InStr(body, "添付") > 0 Then ' 添付ファイルがない場合、警告を表示 If attachmentCount = 0 Then Dim response As VbMsgBoxResult response = MsgBox("メールに『添付』と書かれていますが、添付ファイルがありません。送信しますか？", vbYesNo + vbExclamation, "添付ファイルの確認") If response = vbNo Then Cancel = True End If End If End If End Sub

このコードは、メール送信時に件名や本文に「添付」という言葉が含まれているにも関わらず、添付ファイルがない場合に警告を表示します。

4. セキュリティ設定の調整

VBAマクロを有効にするためには、セキュリティ設定を調整する必要があります。

Outlookの「ファイル」タブから「オプション」を選択します。
「セキュリティセンター」をクリックし、「セキュリティセンターの設定」を開きます。
「マクロの設定」で「警告を表示してすべてのマクロを無効にする」を選択し、「OK」をクリックします。

これで、マクロが適切に動作するようになります。

よくある質問や疑問

Q1. このマクロはすべてのメールに対して動作しますか？

はい、このマクロはOutlookで送信するすべてのメールに対して動作します。ただし、件名や本文に「添付」という言葉が含まれていない場合は、チェックは行われません。

Q2. マクロが正しく動作しない場合、どうすればよいですか？

まず、セキュリティ設定でマクロが有効になっていることを確認してください。また、VBAエディターでコードが正しく入力されているか、エラーメッセージが表示されていないか確認してください。

まとめ

いかがでしたか？OutlookのVBAを活用することで、添付ファイルの添付漏れを防ぐことができます。最初は少し難しく感じるかもしれませんが、一度設定してしまえば日々の業務が格段に効率化されます。ぜひ試してみてください。他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。