DistListItem.GetMember-Methode (Outlook)

Gibt ein Recipient -Objekt zurück, ein Mitglied einer Verteilerliste darstellt.

Syntax

Ausdruck. GetMember (Index)

Ausdruck Eine Variable, die ein DistListItem-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Index Erforderlich Long Der Indexwert des abzurufenden Mitglieds.

Rückgabewert

Ein Recipient -Objekt, das das angegebene Mitglied darstellt.

Beispiel

In diesem Beispiel für Microsoft Visual Basic für Applikationen (VBA) wird jede Verteilerliste im Standardordner Kontakte durchsucht und ermittelt, ob der aktuelle Benutzer in der jeweiligen Liste enthalten ist.

Sub DisplayYourDLNames() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myFolder As Outlook.Folder 
 
 Dim myDistList As Outlook.DistListItem 
 
 Dim myFolderItems As Outlook.Items 
 
 Dim x As Integer 
 
 Dim y As Integer 
 
 Dim iCount As Integer 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI") 
 
 Set myFolder = myNameSpace.GetDefaultFolder(olFolderContacts) 
 
 Set myFolderItems = myFolder.Items 
 
 iCount = myFolderItems.Count 
 
 For x = 1 To iCount 
 
 If TypeName(myFolderItems.Item(x)) = "DistListItem" Then 
 
 Set myDistList = myFolderItems.Item(x) 
 
 For y = 1 To myDistList.MemberCount 
 
 If myDistList.GetMember(y).Name = myNameSpace.CurrentUser.Name Then 
 
 MsgBox "Your are a member of " & myDistList.DLName 
 
 End If 
 
 Next y 
 
 End If 
 
 Next x 
 
End Sub

Siehe auch

DistListItem-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.