Método Actions.Add (Outlook)

Cria uma nova ação na coleção Actions.

Sintaxe

expressão. Adicionar

Expressão Uma variável que representa um objeto Actions .

Valor de retorno

Um objeto Action que representa a nova ação.

Exemplo

Este exemplo do VBA cria uma nova mensagem de email e usa o método Add para adicionar uma ação a ela. Para executar esse exemplo sem erros, substitua 'Dan Wilson' por um nome válido do destinatário.

Sub AddAction() 
 
 Dim myItem As Outlook.MailItem 
 
 Dim myAction As Outlook.Action 
 
 
 
 Set myItem = Application.CreateItem(olMailItem) 
 
 Set myAction = myItem.Actions.Add 
 
 myAction.Name = "Link Original" 
 
 myAction.ShowOn = olMenuAndToolbar 
 
 myAction.ReplyStyle = olLinkOriginalItem 
 
 myItem.To = "Dan Wilson" 
 
 myItem.Send 
 
End Sub

Confira também

Objeto Actions

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.