Evento MailItem.ReplyAll (Outlook)
Ocorre quando o usuário seleciona a ação ReplyAll para um item ou quando o método ReplyAll é chamado para o item, que é uma instância o objeto pai.
Sintaxe
expression. ReplyAll( _Response_ , _Cancel_ )
expressão Uma variável que representa um objeto MailItem.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Response | Obrigatório | Objeto | O novo item que está sendo enviado em resposta à mensagem original. |
| Cancel | Obrigatório | Boolean | False quando o evento ocorre. Se o procedimento de evento define este argumento como True, a resposta todos operação não será concluída e o novo item não é exibida. |
Comentários
Retorna a resposta como um objeto MailItem.
Exemplo
Este exemplo Visual Basic for Applications (VBA) usa o evento ReplyAll e lembra o usuário de que a ação responderá a todos os destinatários originais de um item e, dependendo da resposta do usuário, permite que a ação continue ou interrompe a ele. Para usar este exemplo, abra um item de email existente, execute o procedimento Initialize Handler() e responder ao item.
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
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.