
Tenho alguns modelos de email que eu e meus colegas usamos com frequência no Outlook 2010, que precisam ser enviados de uma caixa de correio compartilhada. Cada vez que envio um, preciso primeiro alterar o endereço 'De' (assim:), o que leva tempo e pode ser esquecido.
Existe uma maneira (macro ou não) de salvar o endereço de origem como parte do modelo de email (.oft), para que ele não precise ser definido sempre?
Responder1
Foram necessárias algumas tentativas e erros, mas aqui está a macro:
Sub templateName()
Dim objMsg As MailItem
Set objMsg = Application.CreateItemFromTemplate("C:\Users\User\AppData\Roaming\Microsoft\Templates\templateName.oft")
With objMsg
.SentOnBehalfOfName = "[email protected]"
.Display
End With
End Sub
Responder2
Não há opção interna no Outlook para salvar o campo De em um modelo. De acordo com a macro, descobriuma discussão semelhanteem outro fórum, mas a macro mencionada não funcionou para mim.