Evento MailItem.Forward (Outlook)
Ocorre quando o usuário seleciona a ação Forward para um item ou quando o método Forward é chamado para o item que é uma instância do objeto pai.
Sintaxe
expression. Forward( _Forward_ , _Cancel_ )
expressão Uma variável que representa um objeto MailItem.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Forward | Obrigatório | Objeto | O novo item que está sendo encaminhado. |
| Cancel | Obrigatório | Boolean | (Não é usado no VBScript (Visual Basic Scripting Edition)). False quando o evento ocorre. Se o procedimento de evento define este argumento como True, a operação de encaminhamento não será concluída e o novo item não será exibido. |
Comentários
No VBScript, se você definir o valor de retorno dessa função como False, a ação de encaminhamento não será concluída e o novo item não será exibido.
Exemplo
Este Microsoft Visual Basic for Applications (VBA) exemplos de uso o evento Forward para desativar o encaminhamento em um item com o assunto "não encaminhar", definindo o argumento como True e ele também exibe uma mensagem que o item não pode ser encaminhado de cancelamento. O código de exemplo deve ser colocado em um módulo de classe como ThisOutlookSession, e a Initialize_Handler() rotina deve ser chamada antes que o procedimento de evento possa ser chamado pelo Microsoft Outlook. Um item de email deve ser aberto quando você executa Initialize_Handler().
Public WithEvents myItem As Outlook.MailItem
Public Sub Initialize_Handler()
Set myItem = Application.ActiveInspector.CurrentItem
End Sub
Private Sub myItem_Forward(ByVal Forward As Object, Cancel As Boolean)
If myItem.Subject = "Do not forward" Then
MsgBox "You may not forward this message!"
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.