RemoveMember Method

Microsoft Outlook Visual Basic

expression.RemoveMember(Recipient)

expression    Required. An expression that returns a DistListItem object.

Recipient   Required Recipient. The Recipient to be removed from the distribution list.

Example

The following Microsoft Visual Basic/Visual Basic for Applications (VBA) example removes a member from the distribution list called Group List. The RemoveMember method will fail if the specified recipient is not valid. Before running the example, create or make sure a distribution list called 'Group List' exists in your default Contacts folder.

Sub RemoveRec()
'Remove a recipient from the list, and displays new list.

    Dim olApp As Outlook.Application
    Dim objDstList As Outlook.DistListItem
    Dim objName As Outlook.NameSpace
    Dim objRcpnt As Outlook.Recipient
    Dim objMail As Outlook.MailItem

    Set olApp = New Outlook.Application
    Set objName = olApp.GetNamespace("MAPI")
    Set objDstList = objName.GetDefaultFolder(olFolderContacts).Items("Group List")
    Set objMail = olApp.CreateItem(olMailItem)
    Set objRcpnt = objMail.Recipients.Add(Name:="[email protected]")
    objRcpnt.Resolve
    objDstList.RemoveMember Recipient:=objRcpnt
    objDstList.Display
    objDstList.Body = "Last Modified: " & Now

End Sub