共用方式為

Outlook) (MailItem.ReplyAll 事件

  • 發行項

會在使用者為項目 (父物件的執行個體) 選取 [全部回覆] 動作或為該項目呼叫 ReplyAll 方法時發生。

語法

expression。 ReplyAll( _Response_ , _Cancel_ )

表達 代表 MailItem 物件的 變數。

參數

名稱 必要/選用 資料類型 描述
回應 必要 Object 為了回應原始訊息所傳送的新項目。
Cancel 必要 布林值 False 事件發生時。 如果事件程序將此引數設定為 True，則無法完成全部回覆作業，而且無法顯示新項目。

註解

以 MailItem 物件傳回回複。

範例

此 Visual Basic for Applications (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 支援與意見反應。