DistListItem.RemoveMembers Method (Outlook)
Removes members from a distribution list.
Syntax
expression .RemoveMembers(Recipients)
expression A variable that represents a DistListItem object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
---|---|---|---|
Recipients |
Required |
The members to be removed from the distribution list. |
Example
The following Microsoft Visual Basic for Applications (VBA) example removes two members from the distribution list called Group List. The RemoveMembers method will fail if the specified recipients are not valid. Before running the example, create or make sure a distribution list called 'Group List' exists in your default Contacts folder.
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