Свойство Comment.AuthorIndex (PowerPoint)

Возвращает значение Long , представляющее номер индекса комментария для заданного автора. Первый комментарий для данного автора имеет индекс номер 1, а второй комментарий — номер индекса 2. Только для чтения.

Важно!

Это свойство не работает с современными комментариями.

Синтаксис

выражение. AuthorIndex

выражение Переменная, представляющая объект Comment .

Возвращаемое значение

Long

Пример

В следующем примере содержатся сведения об авторах и их индексах комментариев для данного слайда.

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

См. также

Объект Comment

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.