Méthode DistListItem.RemoveMembers (Outlook)
Supprime des membres d'une liste de distribution.
Syntaxe
expression. RemoveMembers( _Recipients_ )
Expression Variable qui représente un objet DistListItem .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Destinataires | Requis | Destinataires | Membres à supprimer de la liste de distribution. |
Exemple
L’exemple Microsoft Visual Basic pour Applications (VBA) suivant montre comment supprimer deux membres de la liste de distribution appelée « Liste de groupes ». La méthode RemoveMembers échoue si les destinataires spécifiés ne sont pas valides. Avant d’exécuter l’exemple, créez ou vérifiez qu’il existe une liste de distribution nommée « Liste de groupes » dans votre dossier Contacts par défaut.
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
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.