徹底活用する方法を研究するサイトです。マクロコメントにて以下のご要望をいただきました。初心者ゆえ色々と参考にさせて頂き助かっております。単純な質問で申し訳ありません。Exchange環境でOutlook2016でメール送信時にメーリングリスト(グローバル配布先グループ)のメンバーのSMTPアドレスを展開してメッセージ表示させるようにしたいのですが、どうすれば良いのでしょうか。グローバルの配布先グループに社外アドレスが含まれているものもあり、警告を出したいと考えています。ご教授のほど、宜しくお願い致します。オブジェクトとして取得可能です。これらのオブジェクトを使用してメンバーを展開することができます。連絡先グループを展開するマクロについても「連絡先グループのメンバーを展開してメールアドレスを取得するマクロ」として作成していましたので、こちらの機能も追加しました。マクロは以下の通りです。ここをトリプルクリックでマクロ全体を選択できます。自組織のドメイン名を指定。MsgBox("あて先に組織外のドメインのメールアドレスが含まれています。PM有用なコード/アイデアを多数公開していただき、ありがたく利用させていただいております。メール誤送信の防止の為、送信メールの宛先等を判別して警告するマクロを自社開発し利用しておりますが、判別の高度化が必要となりこの記事にあるコードが参考になりました。配布グループのメンバ展開が上手く機能しないケースがあり、問題を解消する為には、別記事になっている「固定アドレスを追加して返信、転送をするマクロ(2019年8月17日)」に掲載されているコードの一部ロジック(受信者の表示名をアドレス帳のもので置き換えるマクロ)を利用したコードで、Outlook標準の「返信」「全員への返信」を置き換える必要がありました。問題のケースは、返信メールの元となる受信メールが「配布グループを差出人として送信されたもの」に返信する場合に発生しました。この元メールに返信すると、返信メールの宛先に配布グループのアドレスがセットされますが、この宛先のオブジェクトの内部構造が通常の配布グループのものにならないのが原因のようでした。「所有者として送信」権限を使って送信された場合でも「代理人として送信」の場合でもどちらの場合でも問題が起こりました。使用しているOutlookは非サブスクリプションのOffice2016です。このOutlookに起因する問題なのかどうなのか環境を違えて試験することまではできておりません。AM確かに配布グループが差出人になっているメールに返信をすると、そのグループの展開の際にエラーになりますね。グループの名前解決をやり直して展開するようマクロを修正しました。コメントをキャンセルコメントを入力してください。以下に詳細を記入するか、アイコンをクリックしてログインしてください。アカウントを使ってコメントしています。アカウントを使ってコメントしています。アカウントを使ってコメントしています。アカウントを使ってコメントしています。新しいコメントがついたらメールで通知。メールアドレスキャンセル投稿を送信できませんでした。メールアドレスを確認してください。メール送信チェックに失敗しました。このブログではメールでの投稿共有はできません。使用に同意したとみなされます。ポリシー%d人のブロガーが「いいね」をつけました。