Objeto Comments (Word)
Uma coleção de objetos Comment que representam os comentários em uma seleção, intervalo ou documento.
Use a propriedade Comments para retornar a coleção Comments. O exemplo a seguir exibe comentários feitos por Don Funk no documento ativo.
ActiveDocument.ActiveWindow.View.SplitSpecial = wdPaneComments
ActiveDocument.Comments.ShowBy = "Don Funk"
Use a Adicionar método adicionar um comentário no intervalo especificado. O exemplo a seguir adiciona um comentário imediatamente após a seleção.
Selection.Collapse Direction:=wdCollapseEnd
ActiveDocument.Comments.Add Range:=Selection.Range, _
Text:="review this"
Use comentários (Index), onde Index é o número de índice, para retornar um único objeto Comment. O número de índice representa a posição do comentário na seleção especificada, intervalo ou documento. O exemplo a seguir exibe o autor do primeiro comentário do documento ativo.
MsgBox ActiveDocument.Comments(1).Author
O exemplo a seguir exibe as iniciais do autor do primeiro comentário da seleção.
If Selection.Comments.Count >= 1 Then MsgBox _
Selection.Comments(1).Initial
Nome |
---|
Aplicativo |
Count |
Creator |
Parent |
ShowBy |
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.