object. Read-only.
expression.AuthorInitials
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
This property only returns the author's initials. To return the author's name use the Author property. Specify the author's initials when you add a new comment to the presentation.
Example
The following example returns the author's initials for a specified comment.
Sub GetAuthorName()
With ActivePresentation.Slides(1)
.Comments.Add Left:=100, Top:=100, Author:="Jeff Smith", _
AuthorInitials:="JS", _
Text:="This is a new comment added to the first slide."
MsgBox .Comments(1).Author & .Comments(1).AuthorInitials
End With
End Sub