当サイトの記事にはプロモーションが含まれています。

OutlookでVBAを使って宛先を設定する方法【初心者向け解決ガイド】

パソコンパソコン・スマホ教室
スポンサーリンク

こんにちは、皆さん。今日は、Outlookでのメール作成をもっと便利にする方法をお伝えします。特に、VBAを使ってメールの宛先を自動で設定する方法について、一緒に学んでいきましょう。

スポンサーリンク

VBAとは何か?そして、その利点

Outlookのイメージ

Outlookのイメージ

まず最初に、「VBAって何?」と思われる方もいらっしゃるかもしれません。VBAは「Visual Basic for Applications」の略で、Microsoftのアプリケーションを自動化するためのプログラミング言語です。これを使うと、Outlookでの繰り返し作業を自動化し、時間を節約することができます。

Outlookでのメール作成を自動化する基本ステップ

では、具体的にどのようにVBAを使ってOutlookでメールを作成し、宛先を設定するのか、その基本的な手順を見ていきましょう。

  1. OutlookのVBAエディタを開くOutlookを起動し、[Alt] + [F11]キーを押してVBAエディタを開きます。
  2. 新しいモジュールを挿入するメニューから[挿入]を選び、[標準モジュール]をクリックします。
  3. メール作成のコードを記述する以下のようなコードを入力します。
vba
Sub CreateMail()
Dim objOutlook As Object
Dim objMail As Object
Set objOutlook = CreateObject("Outlook.Application")
Set objMail = objOutlook.CreateItem(0)

With objMail
.To = "example@example.com" ' 宛先
.CC = "cc@example.com" ' CC
.BCC = "bcc@example.com" ' BCC
.Subject = "これはテストメールです" ' 件名
.Body = "こんにちは、これはテストメールの本文です。" ' 本文
.Display ' メールを表示
' .Send ' メールを送信する場合は、この行のコメントを外します
End With
End Sub

このコードでは、新しいメールを作成し、宛先、CC、BCC、件名、本文を設定しています。.Displayメソッドでメールを表示し、内容を確認できます。もし、すぐに送信したい場合は、.Sendメソッドを使用します。

複数の宛先やCCを設定する方法

複数の宛先やCCを設定したい場合は、アドレスをセミコロン(;)で区切って指定します。

vba
.To = "example1@example.com; example2@example.com"
.CC = "cc1@example.com; cc2@example.com"

このようにすることで、複数の受信者に同時にメールを送信することができます。

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

Excelのデータを利用してメールを送信する

さらに進んで、Excelに保存されているデータを利用して、複数の宛先にメールを送信する方法もあります。例えば、ExcelのA列にメールアドレスが一覧としてある場合、以下のようなコードで一括送信が可能です。

vba
Sub SendEmailsFromExcel()
Dim objOutlook As Object
Dim objMail As Object
Dim i As Integer
Dim recipient As String

Set objOutlook = CreateObject("Outlook.Application")

i = 1
Do While Cells(i, 1).Value <> ""
recipient = Cells(i, 1).Value
Set objMail = objOutlook.CreateItem(0)

With objMail
.To = recipient
.Subject = "これはテストメールです"
.Body = "こんにちは、これはテストメールの本文です。"
.Display ' メールを表示
' .Send ' メールを送信する場合は、この行のコメントを外します
End With

i = i + 1
Loop
End Sub

このコードは、ExcelのA列に入力されたメールアドレスに対して、順番にメールを作成します。大量のメールを送信する際に非常に便利です。

よくある質問や疑問

Q1: VBAのコードを実行してもメールが送信されません。どうすれば良いですか?

コード内の.Displayメソッドは、メールを表示するだけで送信はしません。自動的に送信したい場合は、.Sendメソッドを使用してください。ただし、.Sendメソッドを使用すると、即座にメールが送信されるため、内容を十分に確認してから実行してください。

Q2: セキュリティの警告が表示されて、メールの送信がブロックされます。どうすれば良いですか?

Outlookのセキュリティ設定によっては、VBAからのメール送信がブロックされることがあります。その場合、信頼できるコードであることを確認し、Outlookのセキュリティ設定を調整する必要があります。ただし、セキュリティ設定の変更は慎重に行ってください。

まとめ

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

他にも疑問やお悩み事があればお気軽にLINEからお声掛けください。

この記事を書いた人
この記事を書いた人

企業の情報システム部門で10年以上、PC・アカウント・社内ネットワーク・Microsoft 365/Google Workspace運用を担当。年間数百件の問い合わせ対応(PC不調、メール送受信、Excel/Word資料、Teams会議、スマホ連携など)を通じて、初心者がつまずくポイントを「再現→原因切り分け→最短解決」の手順に落とし込んできました

現場や身近で実際に起きたトラブルをベースに、手順だけでなく「なぜそうなるか」「失敗しやすい落とし穴」「安全な設定(セキュリティ)」まで含めて解説します。

相談窓口(問い合わせ/LINE等)を設け、記事で解決しないケースも個別にサポートしていますので「パソコンが急に動かなくなった」「スマホの設定がわからない」などの悩みは一人で抱え込まず、お気軽にご相談ください。

【お問い合わせは下記URLから】
https://m32006400n.xsrv.jp/inquiry-form/

【公式LINEは下記URLから】
https://lin.ee/t8TDjcj

uri uriをフォローする
スポンサーリンク
よかったらシェアしてね! /
uri uriをフォローする

コメント

タイトルとURLをコピーしました