DistListItem.MemberCount property (Outlook)
Gibt ein Long zurück, der die Anzahl der Elemente in einer Verteilerliste angibt. Schreibgeschützt.
Syntax
Ausdruck. MemberCount
Ausdruck Eine Variable, die ein DistListItem-Objekt darstellt.
Hinweise
Der zurückgegebene Wert stellt alle Mitglieder der Verteilerliste, einschließlich Member Verteilerlisten. Jede Verteilerliste Member wird als einzelnes Mitglied gezählt. MemberCount ist also kein Aggregat Summe der Empfänger in der Verteilerliste und der Empfänger in Verteilerlisten Member. Wenn eine Verteilerliste 10 Empfänger und eine Verteilerliste mit 15 Empfängern enthält, gibt MemberCount beispielsweise 11 zurück.
Beispiel
In diesem Beispiel für Microsoft Visual Basic für Applikationen wird der Standardordner Kontakte durchlaufen. Wenn der Ordner eine Verteilerliste mit mehr als 20 Mitgliedern auffindet, wird das Element angezeigt.
Sub CheckDLs()
Dim myOlFolder As Outlook.Folder
Dim myOlItems As Outlook.Items
Dim myOlDistList As Outlook.DistListItem
Dim x as Integer
Set myOlFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts)
Set myOlItems = myOlFolder.Items
For x = 1 To myOlItems.Count
If TypeName(myOlItems.Item(x)) = "DistListItem" Then
Set myOlDistList = myOlItems.Item(x)
If myOlDistList.MemberCount > 20 Then
MsgBox myOlDistList.DLName & " has more than 20 members."
myOlDistList.Display
End If
End If
Next x
End Sub
Siehe auch
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.