Méthode ExchangeUser.GetMemberOfList (Outlook)
Renvoie un objet de collection AddressEntries qui contient les objets AddressEntry représentant toutes les listes de distribution Exchange auxquelles l’utilisateur appartient.
Syntaxe
expression. GetMemberOfList
Expression Variable qui représente un objet ExchangeUser .
Valeur renvoyée
Objet de collection AddressEntries qui représente les listes de distribution Exchange auxquelles ExchangeUser (l’utilisateur Exchange) appartient. Renvoie un objet de collection AddressEntries indiquant zéro (0) si ExchangeUser n’est membre d’aucune liste de distribution Exchange.
Remarques
GetMemberOfList nuit aux performances si la connexion au serveur Exchange est lente.
Exemple
L'exemple de code suivant montre comment obtenir les noms des listes de distribution Exchange auxquelles le responsable de l'utilisateur actuel appartient . Il utilise l’objet ExchangeUser pour obtenir des informations utilisateur Exchange spécifiques telles que l’alias de compte Exchange de l’utilisateur, des détails sur le responsable de l’utilisateur et les listes de distribution que le responsable de l’utilisateur a jointes.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.