Событие MailItem.ReplyAll (Outlook)

Статья
04/07/2023

Происходит при выборе пользователем действия ReplyAll для элемента или при вызове метода ReplyAll для элемента, который является экземпляром родительского объекта.

Синтаксис

выражение. ReplyAll( _Response_ , _Cancel_ )

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Отклик	Обязательный	Object	Новый элемент, отправляемый в ответ на исходное сообщение.
Отмена	Обязательный	Boolean	Значение false при возникновении события. Если процедура события задает этому аргументу значение True, операция ответа на все не завершена и новый элемент не отображается.

Замечания

Возвращает ответ в виде объекта MailItem .

Пример

В этом примере Visual Basic для приложений (VBA) используется событие ReplyAll и напоминает пользователю, что продолжение ответит всем первоначальным получателям элемента и в зависимости от ответа пользователя разрешает продолжение или остановку действия. Чтобы использовать этот пример, откройте существующий почтовый элемент, выполните процедуру Initialize Handler() , а затем ответьте на элемент.

Public WithEvents myItem As MailItem 
 
 
 
Sub Initialize_Handler() 
 
 Set myItem = Application.ActiveInspector.CurrentItem 
 
End Sub 
 
 
 
Private Sub myItem_ReplyAll(ByVal Response As Object, Cancel As Boolean) 
 
 Dim mymsg As String 
 
 Dim myResult As Integer 
 
 mymsg = "Do you really want to reply to all original recipients?" 
 
 myResult = MsgBox(mymsg, vbYesNo, "Flame Protector") 
 
 If myResult = vbNo Then 
 
 Cancel = True 
 
 End If 
 
End Sub

См. также

Объект MailItem

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.

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