MailItem.ReplyAll 事件 (Outlook)

在用户选择项目的 ReplyAll 操作时发生,或者在为项目(父对象的一个实例)调用 ReplyAll 方法时发生。

语法

expressionReplyAll( _Response_ , _Cancel_ )

expression 表示 MailItem 对象的变量。

参数

名称 必需/可选 数据类型 说明
响应 必需 对象 为响应原始邮件而发送的新项目。
Cancel 必需 Boolean 的事件发生时。 如果事件过程将此参数设置为 True ,不显示所有操作不会都完成答复和新项目。

备注

将答复作为 MailItem 对象返回。

示例

此 Visual Basic for Applications (VBA) 示例使用 全部答复 事件和提醒用户的继续将对某一项,具体取决于用户的响应的所有原始收件人回复允许继续操作或停止它。 要使用此示例,请打开一个现有的邮件项目,运行 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。