如何更改Word批注中显示的作者姓名

Author: Siluvia Last Modified: 2025-05-07

本文介绍了如何更改Word中用于批注的默认作者姓名，以及如何更新文档中现有批注的作者姓名。您可以通过Word的内置设置或使用VBA宏来实现这一操作。

更改新批注的默认作者姓名

更改文档中现有批注的作者姓名

更改新批注的默认作者姓名

如果您希望新批注显示不同的作者姓名，则需要在Word选项设置中更改用户名。

打开一个Word文档，然后点击“文件”>“选项”。
在“Word选项”窗口中，转到“常规”选项卡。
在“用户名”框中更改名称。
点击“确定”以保存更改。

现在，您插入的任何新批注都会显示更新后的用户名。

更改文档中现有批注的作者姓名

如果您有一个包含许多批注的文档，并且需要一次性更新所有批注的作者姓名，可以使用VBA宏快速完成此操作。

选择包含要更改批注的范围，或者按“Ctrl + A”选择整个文档。
按“Alt + F11”打开Microsoft Visual Basic for Applications窗口。

在VBA编辑器中，点击“插入”>“模块”。然后将以下VBA代码粘贴到模块窗口中：

Sub ChangeCommentAuthor()
'Updated by ExtendOffice 20181112
    Dim I As Long
    Dim xNewName As String
    Dim xShortName As String
    If Selection.Comments.Count = 0 Then
        MsgBox "No comments in your selection!", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    xNewName = InputBox("New author name?", "Kutools for Word")
    xShortName = InputBox("New author initials?", "Kutools for Word")
    If xNewName = "" Or xShortName = "" Then
        MsgBox "The author name/initials can’t be empty.", vbInformation, "Kutools for Word"
        Exit Sub
    End If
    With Selection
        For I = 1 To .Comments.Count
            .Comments(I).Author = xNewName
            .Comments(I).Initial = xShortName
        Next I
    End With
End Sub