Note
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
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
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.