Objet Comments (Word)
Collection d’objets Comment qui représentent les commentaires d’une sélection, d’une plage ou d’un document.
Pour renvoyer la collection Comments, utilisez la propriété Comments. L'exemple suivant montre comment afficher les commentaires insérés par Don Funk dans le document actif.
ActiveDocument.ActiveWindow.View.SplitSpecial = wdPaneComments
ActiveDocument.Comments.ShowBy = "Don Funk"
Utilisez Ajouter méthode pour ajouter un commentaire au niveau de la plage spécifiée. L'exemple suivant ajoute un commentaire juste après la sélection.
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Comments.Add Range:=Selection.Range, _
Text:="review this"
Utilisez Comments (Index), où Index est le numéro d'index, pour renvoyer un seul objet Comment. Le numéro d'index représente la position du commentaire de la sélection spécifiée, une plage ou un document. L'exemple suivant montre comment afficher le nom de l'auteur du premier commentaire du document actif.
MsgBox ActiveDocument.Comments(1).Author
L'exemple suivant montre comment afficher les initiales de l'auteur du premier commentaire de la sélection.
If Selection.Comments.Count >= 1 Then MsgBox _
Selection.Comments(1).Initial
Référence du modèle objet Word
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.