VBA で電子メールを送信: 11 のシンプルで簡単なステップで学習

Visual Basic for Applications (VBA) は強力なプログラミング言語でありながら簡単で、Microsoft Excel を最大限に自動化できます。そのような自動化の 1 つは、VBA コードを使用して Outlook、PowerPoint、Word などの他の Microsoft アプリを統合し、生産性を向上させることです。

Excel の VBA を使用した電子メールの送信は、スプレッドシートやレポートのメール送信タスクを自動化することで作業を容易にする統合の 1 つです。このチュートリアルでは、Excel から VBA を使用して電子メールを送信する手順を、わかりやすい手順で説明します。

Microsoft Outlook オブジェクト ライブラリのアクティブ化

Outlook のメール送信オブジェクト参照はExcel VBAの外部オブジェクトであるため、設定する必要があります。次の手順に従ってください。

• [ファイル] > [名前を付けて保存] をクリックして場所を選択し、[名前を付けて保存] の種類を変更して、既存の Excel ファイルをマクロ有効ファイルとして保存します。
• Alt+F11を押してVBA コード エディタを表示し、上部のメニュー バーにある[ツール]をクリックします。

• そこから、「参照」を選択し、 「利用可能な参照」リストをスクロールして、 「Microsoft Outlook 16.0 Object Library」を見つけます。
• オブジェクトを選択し、「OK」をクリックして「使用可能な参照」リストを終了します。

VBA を使用した電子メールの送信: コードを記述して実行する

Excel VBA で Outlook オブジェクトを有効にしたので、次の手順に従って Excel マクロを作成し、実行します。

• VBA コード エディター インターフェイスを使用していることを確認してください。次に、 Excel VBA のトップ メニューで[挿入]タブを探します。
• [挿入]をクリックし、 [モジュール]を選択して、VBA コードを記述できるモジュールを挿入します。
• 次に、次の VBA スクリプトをコピーして、新しく作成したモジュールに貼り付けます。

Sub sending_email_with_VBA() Dim EmailApp As Outlook.Application Dim Source As String Set EmailApp = New Outlook.Application Dim EmailItem As Outlook.MailItem Set EmailItem = EmailApp.CreateItem(olMailItem) EmailItem.To = "[email protected]" EmailItem.CC = "[email protected]" EmailItem.BCC = "[email protected]" EmailItem.Subject = "顧客の注文の配送状況" EmailItem.HTMLBody = "こんにちは、チーム" & vbNewLine & vbNewLine & "今日の注文のスプレッドシートを PFA status" & _ vbNewLine & vbNewLine & _ "よろしく" & vbNewLine & _ "Tamal Das" Source = ThisWorkbook.FullName EmailItem.Attachments.Add Source EmailItem.Send End Sub

上記のコードは、Outlook アカウントを使用して、コード内で指定されている電子メール アドレスに電子メールを送信します。

電子メールのコンテンツは、EmailItem.HTMLBodyコード ラインでも使用できます。さらに、Excel VBA は、ソース ワークブックを添付ファイルとして電子メールに自動的に添付します。

次の変更を加えて、アドレスと電子メールの本文をカスタマイズできます。

• 見積もり内のすべての電子メール アドレスを独自のOutlook 連絡先に置き換えます。
• 引用内のEmailItem.Subjectテキストを必要に応じてカスタマイズします。
• EmailItem.HTMLBodyコードでは、引用符内のすべてのテキストを独自のコンテンツに置き換えることができます。
• 次に、 F5を押して VBA スクリプトを実行します。

VBA を使用して電子メールを正常に送信するには、Microsoft Office スイートのスタンドアロン Outlook アプリでGmail アカウントまたは Outlook アカウントを構成する必要があります。オンライン ブラウザ ベースの Outlook は、この VBA コードでは動作しません。

結論

VBA を使用して電子メールを送信するための前述の手順を実行したので、Excel で日常的なタスクを自動化することがより簡単になるはずです。たとえば、共同作業者がワークシートを更新したときに、スプレッドシート ファイルから電子メールが自動的に送信されるようにします。また、Excel の注文ステータス列を更新するときに、顧客に自動メールを送信します。

VBA を使用して Excel をさらに自動化したい場合は、VBA タイムスタンプコーディングを利用してスプレッドシートの変更のログを保持します。