PowerPoint VBA教程:AuthorIndex属性

返回 Long 的值,该值代表给定作者的批注的索引号。给定作者第一个批注的索引号为 1,第二个批注的索引号为 2,以此类推。只读。

expression.AuthorIndex

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

VBA示例

以下示例提供了给定幻灯片中作者及其批注索引的信息。


Sub GetCommentAuthorInfo()
    Dim cmtComment As Comment
    Dim strAuthorInfo As String
    With ActivePresentation.Slides(1)
        If .Comments.Count > 0 Then
            For Each cmtComment In .Comments
                strAuthorInfo = strAuthorInfo & "Comment Number:  " & _
                    cmtComment.AuthorIndex & vbLf & _
                    "Made by:  " & cmtComment.Author & vbLf & _
                    "Says:  " & cmtComment.Text & vbLf & vbLf
            Next cmtComment
        End If
    End With
    MsgBox "The comments for this slide are as follows: " & _
        vbLf & vbLf & strAuthorInfo
End Sub

上页:PowerPoint VBA教程:Author属性 下页:PowerPoint VBA教程:AuthorInitials属性

PowerPoint VBA教程:AuthorIndex属性

PowerPoint VBA教程:AuthorInitials属性 PowerPoint VBA教程:AutoAttach属性
PowerPoint VBA教程:AutoCorrect属性 PowerPoint VBA教程:AutoFormat属性
PowerPoint VBA教程:AutoLayout属性 PowerPoint VBA教程:AutoLength属性
PowerPoint VBA教程:AutoLoad属性 PowerPoint VBA教程:AutomationSecurity属性
PowerPoint VBA教程:AutoReverse属性 PowerPoint VBA教程:AutoRotateNumbers属性
PowerPoint VBA教程:AutoShapeType属性 PowerPoint VBA教程:AutoSize属性
PowerPoint VBA教程:AutoUpdate属性 PowerPoint VBA教程:BackColor属性
PowerPoint VBA教程:Background属性 PowerPoint VBA教程:BaseLineAlignment属性
PowerPoint VBA教程:BaselineOffset属性 PowerPoint VBA教程:BeginArrowheadLength属性
PowerPoint VBA教程:BeginArrowheadStyle属性 PowerPoint VBA教程:BeginArrowheadWidth属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号