expression.MarkCommentsWith
expression Required. An expression that returns an EMailOptions object.
Remarks
The default value is the value of the UserName property.
Example
This example sets Word to mark comments in e-mail messages with the initials "WK."
Application.EmailOptions.MarkCommentsWith = "WK"
Application.EmailOptions.MarkComments = True