通过

Comment.Initial Property

  • 项目
Word Developer Reference

Returns or sets the initials of the user associated with a specific comment. Read/write String.

Syntax

expression.Initial

expression   An expression that returns a Comment object.

Example

This example displays the initials of the user who made the first comment in the selection.

Visual Basic for Applications 
  If Selection.Comments.Count >= 1 Then
    MsgBox "Comment made by " & Selection.Comments(1).Initial
End If

This example checks the author initials associated with each comment in the first document section. If the author initials are "MSOffice," the example changes them to "KAE."

Visual Basic for Applications 
  Dim rngTemp As Range
Dim comLoop As Comment

Set rngTemp = ActiveDocument.Sections(1).Range
For Each comLoop In rngTemp.Comments
If comLoop.Initial = "MSOffice" Then comLoop.Initial = "KAE"
Next comLoop

See Also