Partager via


Propriété Comment.AuthorIndex (PowerPoint)

Renvoie une valeur de type Long représentant le numéro d’index du commentaire d’un auteur particulier. Le numéro d’index du premier commentaire d’un auteur donné est 1, celui de son deuxième commentaire est 2. En lecture seule.

Importante

Cette propriété ne fonctionne pas avec les commentaires modernes.

Syntaxe

expression. AuthorIndex

expression Variable qui représente un objet Comment .

Valeur renvoyée

Entier long

Exemple

L’exemple suivant montre comment afficher des informations sur les auteurs et l’index de leurs commentaires pour une diapositive spécifique.

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

Voir aussi

Objet Comment

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.