Méthode DistListItem.AddMembers (Outlook)
Ajoute de nouveaux membres à une liste de distribution.
Syntaxe
expression. AddMembers
( _Recipients_
)
Expression Variable qui représente un objet DistListItem .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Destinataires | Requis | Destinataires | Membres à ajouter à la liste de distribution. |
Exemple
Cet exemple Microsoft Visual Basic pour Applications (VBA) montre comment créer une liste de distribution et comment ajouter l’utilisateur actuel et « Dan Wilson » à la liste. Si le destinataire spécifié n’est pas valide, la méthode AddMember échoue. Par conséquent, pour exécuter cet exemple, remplacez « Dan Wilson » par un nom de destinataire valide.
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
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.