Метод ExchangeUser.GetMemberOfList (Outlook)

Статья
04/07/2023

Возвращает объект коллекции AddressEntries , содержащий объекты AddressEntry , представляющие все списки рассылки Exchange, к которым принадлежит пользователь.

Синтаксис

выражение. GetMemberOfList

Выражение Переменная, представляющая объект ExchangeUser .

Возвращаемое значение

Объект коллекции AddressEntries , представляющий списки рассылки Exchange, к которым принадлежит ExchangeUser . Возвращает объект коллекции AddressEntries с нулем (0), если ExchangeUser не является членом ни одного списка рассылки Exchange.

Замечания

GetMemberOfList — это дорогостоящая операция с точки зрения производительности при медленном подключении к Exchange Server.

Пример

В следующем примере кода показано, как получить имена списков рассылки Exchange, к которым принадлежит руководитель текущего пользователя. Объект ExchangeUser используется для получения определенных сведений о пользователе Exchange, таких как псевдоним учетной записи Exchange пользователя, сведения о диспетчере пользователя и списки рассылки, к которым присоединился руководитель пользователя.

Sub ShowManagerDistLists() 
 
 Dim oAE As Outlook.AddressEntry 
 
 Dim oExUser As Outlook.ExchangeUser 
 
 Dim oDistListEntries As Outlook.AddressEntries 
 
 
 
 'Obtain the AddressEntry for CurrentUser 
 
 Set oExUser = _ 
 
 Application.Session.CurrentUser.AddressEntry.GetExchangeUser 
 
 
 
 'Obtain distribution lists that the user's manager has joined 
 
 Set oDistListEntries = oExUser.GetExchangeUserManager.GetMemberOfList 
 
 For Each oAE In oDistListEntries 
 
 If oAE.AddressEntryUserType = _ 
 
 olExchangeDistributionListAddressEntry Then 
 
 Debug.Print (oAE.name) 
 
 End If 
 
 Next 
 
End Sub

См. также

Объект ExchangeUser

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

Поделиться через