Author 属性

返回 String 的值，该值代表指定 Comment 对象的作者。只读。

expression  必选。该表达式返回“应用于”列表中的对象之一。

说明

此属性只返回作者姓名。若要返回作者姓和名的首字母，请使用 AuthorInitials 属性。在向演示文稿中添加新的批注时指定批注的作者。

示例

以下示例向当前演示文稿的第一张幻灯片中添加批注，然后以消息的形式显示作者的姓名以及姓和名的首字母。 

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 "This comment was created by " & _
            .Comments(1).Author & " (" & .Comments(1).AuthorInitials & ")."
    End With
End Sub