やすひさどっとねっと

ヘッダに書かれている名前ではなく、アドレス帳から名前や備考などの欄の文字を参照し、メールの本文に列記するマクロです。(アドレス帳に登録されていない場合は、ヘッダから情報をできる限り取得します)

名前欄で姓と名を半角空白で区切っている場合は名字のみを参照することが可能です。
(例)「山田 太郎」→「山田」

1. 挿入したい行に <<InsertNameToHeader>> という文字列を本文に書きます。
※「To」の部分を「Cc」に変更し、<<InsertNameCcHeader>> とすると、「Cc: 」ヘッダを参照します。

2. <<InsertNameToHeader>> の後ろに変換したい書式を使って、文字を書き入れます。

書式として使えるのは以下の通りです。

3. <<InsertNameToHeader>> の前にも文字を入れることができます。
文字列をアドレス帳から参照することはできません。説明しづらいので下の例を参照ください。

4. このマクロを実行します。
すると、書式が書かれている行を始点として書式に従って文字列が挿入されます。

【前提条件】
アドレス帳に以下のメンバーが含まれているとします。

そして、編集中のメールの「To: 」ヘッダが以下の通りだとします。(アドレス以外の情報があっても結果は同じ)
To:       test1@test1, test2@test1, test3@test2, test4@test3, tarou@yamada

【動作例１】
本文に下のような文字列を記入しておき、マクロを実行すると下のようになります。
<<InsertNameToHeader>>[note2] [lastname][note1]
　　　　↓
(株)ＡＢＣ Ａさま
(株)ＡＢＣ Ｂ様
(株)あいうえお あ様
(有)アカサタナ ア殿
(有)いろはに 山田様

【動作例２】
少しだけ変えて、本文に下のような文字列を記入しておき、マクロを実行すると下のようになります。
To: <<InsertNameToHeader>>[note2] [lastname][note1]
　　　　↓
To: (株)ＡＢＣ Ａさま
    (株)ＡＢＣ Ｂ様
    (株)あいうえお あ様
    (有)アカサタナ ア殿
    (有)いろはに 山田様

私は先ほどから出てきているとおり、下の設定を好みます。
<<InsertNameToHeader>>[note2] [lastname][note1]

理由は以下の通りです。

メールの一覧の「To: 」の項目に「備考１」「備考２」「備考３」の順で表示させることができます。
※設定は「全般的な設定」の「メール一覧」にあります。

「備考１」を「様」などの敬称、「備考２」を社名などの所属にしておくと、例えば「山田 太郎(様,(有)いろはに)」という感じでメール一覧部分に表示されてわかりやすいということでこの設定にしています。