Outlook VBAで活用するイベント一覧とその使い方

皆さん、こんにちは。今回は、Outlookをもっと便利に使いこなすための「VBAイベント」についてお話しします。「イベントって何？」と思われる方も多いかもしれませんが、心配いりません。初心者の方でも理解できるよう、わかりやすく解説していきます。

Outlook VBAのイベントとは？
主なOutlook VBAのイベント一覧
実際にイベントを使ってみよう
よくある質問や疑問
1. Q1: イベントマクロが動作しません。どうすればいいですか？
2. Q2: 他のイベントも試してみたいのですが、どこで確認できますか？
今すぐ解決したい！どうしたらいい？
まとめ

Outlook VBAのイベントとは？

Outlookのイメージ

まず、「イベント」とは、Outlook内で何かしらの動作や操作が行われたときに発生する出来事のことを指します。例えば、メールを送信したときや新しいメールを受信したときなどが該当します。これらのイベントに対して、自動的に特定の処理を実行するプログラムを組むことができるのが、Outlook VBAの魅力です。

主なOutlook VBAのイベント一覧

Outlook VBAにはさまざまなイベントが用意されていますが、ここでは特に日常的によく使われるものをいくつかご紹介します。

ここがポイント！

Application_StartupOutlookが起動したときに発生します。
Application_QuitOutlookが終了するときに発生します。
Application_NewMailEx新しいメールを受信したときに発生します。
Application_ItemSendメールを送信するときに発生します。
Application_Reminderリマインダーが表示される直前に発生します。

これらのイベントを活用することで、Outlookの操作をより効率的に自動化することが可能です。

実際にイベントを使ってみよう

それでは、具体的にイベントを活用したマクロの作成方法を見ていきましょう。ここでは、メール送信時に「本当に送信しますか？」と確認メッセージを表示するマクロを作成してみます。

Outlookを開き、キーボードの「Alt」キーと「F11」キーを同時に押して、VBAエディターを起動します。
左側の「Microsoft Outlook Objects」内にある「ThisOutlookSession」をダブルクリックします。
右側のコードウィンドウ上部にある「オブジェクト」ドロップダウンから「Application」を選択します。
続いて、その隣の「プロシージャ」ドロップダウンから「ItemSend」を選択します。
自動的に生成されたコードの中に、以下のコードを追加します。

vba

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

    Dim prompt As String

    prompt = "本当に送信しますか？"

    If MsgBox(prompt, vbYesNo + vbQuestion, "確認") = vbNo Then

        Cancel = True

    End If

End Sub

このマクロを保存すると、メールを送信するたびに確認メッセージが表示され、誤送信を防ぐことができます。