Email Property
Returns an Email object that contains all the e-mail – related properties of the current document. Read-only.
This example returns the name of the style associated with the current e-mail author.
MsgBox ActiveDocument.Email _
.CurrentEmailAuthor.Style.NameLocal