Método ExchangeUser.GetMemberOfList (Outlook)

Retorna um objeto da coleção AddressEntries que contém os objetos AddressEntry que representam todas as listas de distribuição do Exchange às quais o usuário pertence.

Sintaxe

expression. GetMemberOfList

Expressão Uma variável que representa um objeto ExchangeUser .

Valor de retorno

Lista de um objeto da coleção AddressEntries que representa a distribuição do Exchange ao qual pertence o ExchangeUser. Retorna um objeto da coleção AddressEntries com uma contagem de zero (0) se ExchangeUser não for um membro de qualquer lista de distribuição do Exchange.

Comentários

GetMemberOfList será uma operação morosa em termos de desempenho se houver uma conexão lenta com o Exchange Server.

Exemplo

O exemplo de código a seguir mostra como obter os nomes das listas de distribuição do Exchange ao qual pertence o gerente do usuário atual. Ele usa o objeto ExchangeUser para obter Exchange usuário informações específicas, como o alias de conta do Exchange do usuário, detalhes sobre o gerente do usuário e as listas de distribuição que o gerente do usuário que tenha ingressado.

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 

Confira também

Objeto ExchangeUser

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.