Classe EmailAuthor (Word VBA)

A classe EmailAuthor representa o autor de uma mensagem de email. Para usar uma variável de classe EmailAuthor, ela primeiro precisa ser instanciada por exemplo

Dim ear as EmailAuthor
Set ear = ActiveDocument.Email.CurrentEmailAuthor

Style

Retorna um objeto Style que representa o estilo associado ao autor de email atual para respostas não enviadas, encaminhamentos ou novas mensagens de email.

Set MyEmailStyle = _ 
 ActiveDocument.Email.CurrentEmailAuthor.Style 
Msgbox MyEmailStyle.Font.Name