MailItem.ReplyAll 事件 (Outlook)
在用户选择项目的 ReplyAll 操作时发生,或者在为项目(父对象的一个实例)调用 ReplyAll 方法时发生。
语法
expression。 ReplyAll
( _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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。