Clase EmailAuthor (Word VBA)

La clase EmailAuthor representa al autor de un mensaje de correo electrónico. Para usar una variable de clase EmailAuthor, primero debe ser instanciado, por ejemplo

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

Style

Devuelve un objeto Style que representa el estilo asociado con el autor de correo electrónico actual para los mensajes de correo electrónico de respuesta, reenvío o nuevos no enviados.

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