Outlook VBAで作成中のメールを操作する方法【初心者向け解決ガイド】

2025.03.052026.09.04

皆さん、こんにちは。今日は、OutlookのVBAを使って、現在編集中のメールを操作する方法についてお話しします。パソコンやスマホの操作が苦手な方でも、安心して取り組める内容になっていますので、ぜひ最後までご覧ください。

Outlook VBAとは？
Outlook VBAの基本メールの作成と送信
作成中のメールを操作する方法
よくある質問や疑問
1. Q1: VBAを使う際に注意すべき点はありますか？
2. Q2: VBAのコードがうまく動作しない場合、どうすれば良いですか？
まとめ

Outlook VBAとは？

Outlookのイメージ

まず、VBAとは「Visual Basic for Applications」の略で、MicrosoftのOffice製品を自動化するためのプログラミング言語です。OutlookでもVBAを使うことで、メールの作成や送信などの操作を自動化できます。例えば、毎日同じ内容のメールを送る場合、VBAを使えばボタン一つでメールを作成・送信することが可能です。

Outlook VBAの基本メールの作成と送信

では、具体的にVBAでメールを作成し、送信する方法を見ていきましょう。以下の手順で進めます。

OutlookのVBAエディターを開く。
新しいマクロを作成する。
メールを作成し、送信するコードを記述する。

まず、Outlookを開き、「Alt」キーと「F11」キーを同時に押してVBAエディターを開きます。次に、「挿入」メニューから「標準モジュール」を選択し、新しいマクロを作成します。以下のコードを入力してみましょう。

vba

Sub CreateAndSendMail()

    Dim objMail As Object

    Set objMail = Application.CreateItem(0) ' 新しいメールアイテムを作成

    With objMail

        .To = "example@example.com" ' 宛先

        .Subject = "テストメール" ' 件名

        .Body = "これはテストメールです。" ' 本文

        .Send ' メールを送信

    End With

End Sub

このコードを実行すると、指定した宛先にメールが送信されます。

作成中のメールを操作する方法

次に、現在編集中のメールに対して操作を行う方法を見ていきましょう。例えば、編集中のメールに特定のテキストを追加したい場合、以下のようなコードを使用します。

vba

Sub AddTextToActiveMail()

    Dim objMail As Object

    Set objMail = Application.ActiveInspector.CurrentItem ' 現在編集中のメールを取得

    If objMail.Class = olMail Then ' アイテムがメールであることを確認

        objMail.Body = objMail.Body & vbCrLf & "追加するテキスト" ' 本文にテキストを追加

    Else

        MsgBox "現在編集中のアイテムはメールではありません。"

    End If

End Sub

このコードを実行すると、現在編集中のメールの末尾に「追加するテキスト」という文字列が追加されます。

よくある質問や疑問

Q1: VBAを使う際に注意すべき点はありますか？

はい、VBAを使用する際は、誤って重要なメールを削除したり、誤送信しないよう注意が必要です。コードを実行する前に、必ず内容を確認し、テスト環境で試すことをお勧めします。

Q2: VBAのコードがうまく動作しない場合、どうすれば良いですか？

エラーメッセージを確認し、コード内のスペルミスや構文エラーがないかチェックしてください。また、Outlookの設定やバージョンによっては、コードが動作しない場合がありますので、その場合はインターネットで同様の事例を検索してみると良いでしょう。

まとめ

今回は、OutlookのVBAを使って、作成中のメールを操作する方法についてご紹介しました。最初は難しく感じるかもしれませんが、慣れてくると非常に便利なツールです。ぜひ、日々の業務効率化に役立ててください。