通过

DistListItem.RemoveMember 方法 (Outlook)

  • 项目

从指定通讯组列表删除单个成员。

语法

expression。 RemoveMember( _Recipient_ )

表达 一个代表 DistListItem 对象的变量。

参数

名称 必需/可选 数据类型 说明
收件人 必需 Recipient 从通讯组列表中删除 收件人 。

示例

(VBA) 示例下面的 Microsoft Visual Basic for Applications 从称为组列表的通讯组列表中移除成员。 如果指定的收件人无效， RemoveMember 方法将失败。 运行此示例之前，应先创建或请确保默认联系人文件夹中存在名为 Group List 的通讯组列表。

Sub RemoveRec() 
 
 '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 objMail As Outlook.MailItem 
 
 
 
 Set objName = Application.GetNamespace("MAPI") 
 
 Set objDstList = objName.GetDefaultFolder(olFolderContacts).Items("Group List") 
 
 Set objMail = Application.CreateItem(olMailItem) 
 
 Set objRcpnt = objMail.Recipients.Add(Name:="someone@example.com") 
 
 objRcpnt.Resolve 
 
 objDstList.RemoveMember Recipient:=objRcpnt 
 
 objDstList.Display 
 
 objDstList.Body = "Last Modified: " & Now 
 
End Sub

另请参阅

DistListItem 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。