Freigeben über


DistListItem.AddMembers-Methode (Outlook)

Fügt einer Verteilerliste neue Mitglieder hinzu.

Syntax

Ausdruck. AddMembers( _Recipients_ )

Ausdruck Eine Variable, die ein DistListItem-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Empfänger Erforderlich Recipients Mitglieder, die der Verteilerliste hinzugefügt werden sollen.

Beispiel

Microsoft Visual Basic für Applikationen (VBA) wird eine neue Verteilerliste erstellt und der Liste der aktuelle Benutzer und "Dan Wilson" hinzugefügt. Wenn der angegebene Empfänger nicht gültig ist, schlägt die AddMember -Methode fehl. Ersetzen Sie daher zum Ausführen dieses Beispiels "Dan Wilson" durch einen gültigen Namen eines Empfängers.

Sub AddNewMembers() 
 
 Dim myNameSpace As Outlook.NameSpace 
 
 Dim myDistList As Outlook.DistListItem 
 
 Dim myTempItem As Outlook.MailItem 
 
 Dim myRecipients As Outlook.Recipients 
 
 
 
 Set myNameSpace = Application.GetNamespace("MAPI 
 
 Set myDistList = Application.CreateItem(olDistributionListItem 
 
 Set myTempItem = Application.CreateItem(olMailItem 
 
 Set myRecipients = myTempItem.Recipients 
 
 myDistList.DLName = _ 
 
 InputBox("Enter the name of the new distribution list 
 
 myRecipients.Add myNameSpace.CurrentUser.Name 
 
 myRecipients.Add "Dan Wilson 
 
 myRecipients.ResolveAll 
 
 myDistList.AddMembers myRecipients 
 
 myDistList.Save 
 
 myDistList.Display 
 
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.