Comments 属性

返回 Comments 对象，该对象代表批注的集合。

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

示例

以下示例在幻灯片中添加一个批注。

Sub AddNewComment()
    ActivePresentation.Slides(1).Comments.Add _
        Left:=0, Top:=0, Author:="John Doe", AuthorInitials:="jd", _
        Text:="Please check this spelling again before the next draft."
End Sub