DistListItem.RemoveMembers-Methode (Outlook)

Entfernt Mitglieder aus einer Verteilerliste.

Syntax

Ausdruck. RemoveMembers( _Recipients_ )

Ausdruck Eine Variable, die ein DistListItem-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Empfänger Erforderlich Recipients Die von der Verteilerliste zu entfernenden Mitglieder.

Beispiel

Der folgende Microsoft Visual Basic für Applikationen (VBA) werden zwei Elemente aus der Verteilerliste Gruppenliste aufgerufen entfernt. Die RemoveMembers -Methode schlägt fehl, wenn die angegebenen Empfänger nicht gültig sind. Vor dem Ausführen des Beispiels erstellen Sie, oder stellen Sie sicher, dass eine Verteilerliste namens 'Gruppenliste' im Standardordner Kontakte vorhanden ist.

Sub RemoveRecs() 
 
 'Remove a recipient from the list and displays new list. 
 
 Dim objDstList As Outlook.DistListItem 
 
 Dim objName As Outlook.NameSpace 
 
 Dim objRcpnt As Outlook.Recipient 
 
 Dim objRcpnt2 As Outlook.Recipient 
 
 Dim objMail As Outlook.MailItem 
 
 Dim objRcpnts As Outlook.Recipients 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objDstList = objName.GetDefaultFolder(olFolderContacts).Items("Group List") 
 
 Set objMail = Application.CreateItem(olMailItem) 
 
 Set objRcpnts = objMail.Recipients 
 
 Set objRcpnt = objRcpnts.Add(Name:="someone@example.com") 
 
 Set objRcpnt2 = objRcpnts.Add(Name:="someone@example.org") 
 
 objRcpnts.ResolveAll 
 
 objDstList.RemoveMembers objRcpnts 
 
 objDstList.Display 
 
 objDstList.Body = "Last Modified: " & Now 
 
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.