vba:表示名またはupnで始まるすべての可能な電子メールアドレスのリストをプログラムで取得します
みなさん、こんにちは
ユーザープリンシパル名または表示名を持っている単一の連絡先のOutlookプロパティにプログラムで(VBA Excelマクロを使用して)アクセスするにはどうすればよいですか?
Outlookのプロパティの[電子メールアドレス]というラベルの付いたタブに特に興味があります
PrimarySMTPプロパティを取得できましたが、そこにリストされているすべてのアドレスのリストを取得したいと思います.'alias'プロパティは1つのエントリしか提供しませんが、他にもいくつかあります.
配布リストのメンバーシップ情報に関する情報を取得するために、なんとかコードを作成しました.これが私が行ったことです.
ExchangeUserとしてのDimobjExchUsr
Outlook.ApplicationとしてmyolAppを暗くします
名前空間としてmyNameSpaceを暗くする
MyAddrListをAddressListとして薄暗くする
myRecipientをOutlook.Recipientとして薄暗くする
Outlook.AddressEntriesとしてのDimoDistListEntries
Outlook.AddressEntryとしてのDimoAE
myolApp= CreateObject( "Outlook.Application")を設定します
myNameSpace= myolApp.GetNamespace( "MAPI")を設定します
MyAddrList= myNameSpace.addressLists( "グローバルアドレスリスト")を設定します
myRecipient= myNameSpace.CreateRecipient(strDisplayname)を設定します
myRecipient.Resolve
myRecipient.ResolvedThenの場合
objExchUsr=myRecipient.AddressEntry.GetExchangeUserを設定します
oDistListEntries=objExchUsr.GetMemberOfListを設定します
oDistListEntriesの各oAEについて
oAE.AddressEntryUserType=olExchangeDistributionListAddressEntryの場合
<配布リストで何かをする:関係ないこの問題に>
終了する場合
次
終了する場合
このコードを使用すると、Outlookのプロパティの[メンバー]タブに表示される情報を取得できますが、問題は、[電子メールアドレス]タブに表示される情報を取得する方法です.
よろしくお願いします
返信リスト(回答:1)
こんにちはMsartoris24、
良い一日であり、あなたがうまくやっていることを願っています.
あなたの懸念はVBAに関連しているので、そのために特別な専門知識を持つ別の専任チームがあります.そのため、専用のチームに質問を投稿することをお勧めします. Office-vba-dev-Microsoft Q&A 、彼らはあなたのコードをチェックし、さらにあなたを助けることができます.この時点で、皆様のご協力をよろしくお願いいたします.
貴重なお時間をありがとうございました.安全、幸せ、健康を永遠に保ちましょう.
よろしくお願いいたします.
Ankita Vaidya