Propriedade MailItem.Actions (Outlook)
Retorna uma coleção de ações que representa todas as ações disponíveis para o item. Somente leitura.
Sintaxe
expressão. Actions
expressão Uma variável que representa um objeto MailItem.
Exemplo
Este exemplo Visual Basic for Applications (VBA) cria um novo item de email e usa o método Actions.Add para adicionar uma ação a ela. Em seguida, ele envia o item de email para o usuário atual. O item de email recebido terá a ação Concordo além das ações padrão como responder e Responder a todos.
Sub AddAction()
Dim myItem As Outlook.MailItem
Dim myAction As Outlook.Action
Set myItem = Application.CreateItem(olMailItem)
Set myAction = myItem.Actions.Add
myAction.Name = "Agree"
myItem.To = Application.GetNamespace("MAPI").CurrentUser
myItem.Send
End Sub
O seguinte exemplo Visual Basic for Applications cria um novo item de email e usa o método Actions.Add para adicionar uma ação chamado Link Original a ela. Executar esta ação irá inserir um link para o item de email original.
Sub AddAction2()
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.