Outlook VBAでメール本文を操作する方法

皆さん、こんにちは。今日は、Outlookでメールの本文をVBA（Visual Basic for Applications）を使って操作する方法についてお話しします。プログラミングなんて難しそう…と思われるかもしれませんが、心配いりません。初心者の方でも理解できるよう、ゆっくり丁寧に説明していきますね。

Outlook VBAとは？
メール本文の形式を設定する
こんにちは！
メール本文に特定の情報を追加する
よくある質問や疑問
1. VBAコードをどこに入力すればいいの？
2. VBAを使うとOutlookに問題が起きることはありますか？
今すぐ解決したい！どうしたらいい？
まとめ

Outlook VBAとは？

Outlookのイメージ

まず、Outlook VBAについて簡単にご紹介します。VBAとは、Microsoft Office製品に組み込まれているプログラミング言語で、Outlookの操作を自動化したり、カスタマイズしたりすることができます。例えば、定型文のメールを自動で作成したり、特定の条件でメールを振り分けたりと、日々の作業を効率化するのに役立ちます。

メール本文の形式を設定する

Outlookでは、メールの本文形式を以下の3つから選ぶことができます

ここがポイント！

プレーンテキスト
リッチテキスト（RTF）
HTML

特に、HTML形式を使うと、文字の色を変えたり、画像を挿入したりと、見栄えの良いメールを作成できます。VBAを使って、この本文形式を設定する方法を見てみましょう。

以下のコードは、新しいメールを作成し、その本文形式をHTMLに設定する例です。

vba

Sub CreateHTMLMail()

    ' 新しいメールアイテムを作成

    Dim objMail As Outlook.MailItem

    Set objMail = Application.CreateItem(olMailItem)
    With objMail

        ' 本文形式をHTMLに設定

        .BodyFormat = olFormatHTML

        ' HTML形式の本文を設定

        .HTMLBody = "
こんにちは！
これはHTML形式のメールです。

" ' メールを表示 .Display End With End Sub

このコードを実行すると、HTML形式で「こんにちは！」と表示された新しいメールが作成されます。HTMLの知識が少しあると、さらに凝ったデザインのメールも作成できますよ。

メール本文に特定の情報を追加する

次に、メールの本文に特定の情報を追加する方法をご紹介します。例えば、メールの宛先や件名などの情報を本文に含めたい場合、以下のようなコードを書きます。

vba

Sub AddInfoToMailBody()

    ' 新しいメールアイテムを作成

    Dim objMail As Outlook.MailItem

    Set objMail = Application.CreateItem(olMailItem)

With objMail ' 宛先と件名を設定 .To = "example@example.com" .Subject = "お知らせ" ' 本文に宛先と件名の情報を追加 .Body = "このメールは " & .To & " 宛てに送信されます。" & vbCrLf & _ "件名は「" & .Subject & "」です。" ' メールを表示 .Display End With End Sub

このコードを実行すると、宛先と件名の情報が本文に含まれたメールが作成されます。「vbCrLf」は改行を意味し、本文中で改行を挿入する際に使用します。

よくある質問や疑問

VBAコードをどこに入力すればいいの？

OutlookでVBAコードを入力するには、まず「Alt」キーと「F11」キーを同時に押して、VBAエディタを開きます。次に、「挿入」メニューから「標準モジュール」を選択し、表示されたウィンドウにコードを貼り付けます。コードを入力したら、ツールバーの「実行」ボタン（緑の三角形）をクリックして実行できます。