|
こんちには。初めて投稿させていただきます。
以下のサイトを参考に、Excelのデータからメールを自動作成するマクロを作成しています。
moripro.net/vba-outlook-createmail
質問は2点です。
1.
データの行数分、メールを一括で作成する方法は理解できたのですが、複数行にわたって同じメールアドレスがあった場合も、1行に対し1件メールを作成してしまいます。
同じメールアドレスが続く場合、データをまとめメールを1件だけ作成するように制御することは可能でしょうか?
例えば以下の表でマクロを実行した場合、
「佐藤さん宛てに3件」+「鈴木さん宛てに1件」+「田中さん宛てに1件」
=合計5件のメールが作成されてしまいますが、
--------------------------------------
宛先(To) 氏名 使用日 金額
--------------------------------------
sato@xxx.co.jp 佐藤 2018/7/1 100
sato@xxx.co.jp 佐藤 2018/7/2 200
sato@xxx.co.jp 佐藤 2018/7/3 300
suzuki@xxx.co.jp 鈴木 2018/7/4 400
tanaka@xxx.co.jp 田中 2018/7/5 500
--------------------------------------
佐藤さん宛ては3行分の情報を1件のメールにまとめ、以下のようにメールが3件作成されるようにしたいです。
------------------------------------
【宛先】sato@xxx.co.jp
【本文】佐藤さん
使用日:2018/7/1 金額:100
2018/7/2 金額:200
2018/7/3 金額:300
------------------------------------
【宛先】suzuki@xxx.co.jp
【本文】鈴木さん
使用日:2018/7/4 金額:400
------------------------------------
【宛先】tanaka@xxx.co.jp
【本文】田中さん
使用日:2018/7/5 金額:300
------------------------------------
2.
すべての行に対して処理を繰り返すのではなく、特定の行のみに対して処理をしたい場合、どのように変更すれば良いでしょうか?
VBA超初心者のため質問の仕方が適切なのかも分からないのですが、不足している情報があれば教えてください。
どのように記述をすれば良いのか、ご教示いただけますと幸いです。
|
|