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
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.