【コピペでできる】Excelでまとめたリストからメールを一括送信!出欠表の効率化!

アイキャッチExcelメール送信 Excel

Excelで、まとめたリストから一括でメール送信できれば便利ですよね

例えば、
・出欠表から参加者だけに案内メールを送りたい
・提出物の未提出者のみへ催促のメールを送りたい

 

連絡先からいちいち一人ずつ
宛先に追加してると大変で・・・

そんな悩みをExcel VBAで解決!

Excelでまとめたリストから対象者のみを
宛先に追加したメールを作成する機能を作ってみたよ!

対象者のみって?

例えば、こんな時に使えるよ
・出欠表から参加者のみにメールを送りたい
・提出物が未提出の人のみにメールを送りたい

Excelのリストと連絡先を見比べなくて済むんだね!

機能概要

サンプルソースを掲載しています
ぜひご活用下さい!

こんな人におすすめ
・Excelでまとめたリストからメールを作成したい
・出欠表の出席者だけを宛先に指定したメールを作成したい

機能説明

メーラのパスを青いセルに指定します
今回はサンダーバードを使用しています
メーラパス指定

宛先対象文字列セル「C6」に指定した文字列をB列から検索
同じ文字列の場合、メールの宛先に追加します
宛先対象

今回の場合「○」が対象ですね

出席者列には「○」の文字列の人数をカウントしています
出席者の人数

出席者の人数がわかりますね

出欠表を埋めたら「メール作成」ボタンをクリック
メール作成ボタンクリック

 

「○」を指定した人のみ
宛先に追加されたメールが作成されました

宛先複数追加メール

メール一括送信 サンプルソース

VBAのサンプルソースの解説をしていきます

VBAを操作するために「開発」タブ → 「Visual Basic」をクリック
開発タブ

出欠表シート

メールクラスモジュール

他のプログラムにも使用できるよう

共通化したクラスモジュールを作成します

メール送信クラスというイメージでクラス名を指定しました
メールクラス

まとめ

今回できたことなど
・まとめたリストから一括で宛先指定したメールの作成
・出欠確認のち出席者のみを指定したメール作成が可能
・出欠表シートの定数部分を変更することでセルの位置も変更可能

業務の効率化に繋がれば嬉しいです

コメント

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