Метод DistListItem.RemoveMember (Outlook)

Статья
04/07/2023

Удаляет отдельного участника из заданного списка рассылки.

Синтаксис

выражение. RemoveMember( _Recipient_ )

Выражение Переменная, представляющая объект DistListItem .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Получатель	Обязательный	Recipient	Получатель, который будет удален из списка рассылки.

Пример

Следующий пример Microsoft Visual Basic для приложений (VBA) удаляет участника из списка рассылки с именем Group List. Метод RemoveMember завершится ошибкой , если указанный получатель недопустим. Перед выполнением примера создайте или убедитесь, что список рассылки с именем "Список групп" существует в папке "Контакты" по умолчанию.

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 и обратная связь.

Поделиться через