跳到主要内容

如何在Word中更改作者姓名以进行注释

本文讨论的是更改注释的默认作者姓名,或将文档中的现有作者姓名更改为新的作者姓名。 请尝试以下两种方法。

更改评论的作者姓名以备将来使用

更改文档现有评论的作者姓名


更改评论的作者姓名以备将来使用

如果要更改注释的作者名称以供将来使用,请在“ Word选项”窗口中更改“用户名”。

1.在打开的Word文档中,单击 文件 > 附加选项。 在 Word选项“ 窗口,请确保您位于 总类 标签,在 用户名 对话框如下图所示,最后单击 OK 按钮。

现在,您已经更改了Word文档中注释的默认用户名。


更改文档现有评论的作者姓名

如果您收到一个包含大量评论的文档,并且想要将所有评论的作者姓名更改为某个人,那么下面的 VBA 代码将帮您一个忙。

1.选择包含注释的范围,或选择整个文档,然后按 按Ctrl + A 键,按 其他 + F11 键打开 Microsoft Visual Basic应用程序 窗口。

2.在开幕 Microsoft Visual Basic应用程序 窗口中,单击 插页 > 模块。 然后将下面的VBA代码复制到“模块”窗口中。

VBA代码:更改现有评论的文档作者姓名

Sub ChangeCommentAuthor()
'Updated by EntendOffice 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

3。 按 F5 键来运行代码。 在开幕 评论作者姓名 对话框中,在文本框中输入新的作者姓名,然后单击 OK 按钮。

4.在下一个开口 评论首字母 对话框中,根据需要输入缩写,然后单击 OK 按钮。

然后,所选范围内的所有评论的作者姓名将立即更改为指定的作者姓名,如下图所示。

最佳办公生产力工具

Kutools for Word - 通过 Over 提升您的文字体验 100 显着特点!

深入了解下面突出显示的功能或 单击此处探索 Kutools for Word 的全部功能.

📘 文档掌握: 分页  /  合并文件  /  以各种格式导出选择(PDF/TXT/DOC/XLSX)  /  批量转换为PDF  /  将页面导出为图像  /  一次打印多个文件 ...

内容编辑: 批量查找和替换 跨多个文件   /  调整所有图片的大小   /  转置表行和列  /  将表格转换为文字 ...

🧹 轻松清洁扫开 多余的空间  /  分节符  /   所有标题  /  文本框  /  超链接  /  如需更多删除工具,请前往我们的删除组

创意插入: 插页 千位分隔符  /  复选框  /  单选按钮  /  二维码  /  条码  /  对角线表  /  公式标题  /  图片说明  /  表标题  /  多张图片  /  在我们的插入组中发现更多信息

🔍 精准选择: 精确定位特定页面  /    /  形状  /  标题段落  /  使用我们的选择组轻松导航

星级增强: 快速导航至任何位置  /  自动插入重复文本  /  在文档窗口之间无缝切换  /  11 转换工具 ...

使用 Kutools 转换您的 Word 任务。 👉 立即下载并试用 30 天 🚀。

了解更多       免费下载      购买
 
Comments (32)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
Hi, thanks for this guide. However I'm stuck at the module step. What do you mean with pressing F5 keys? Can you show me? Thank you
This comment was minimized by the moderator on the site
Hi Carla,

After adding the VBA code, stay in the Microsoft Visual Basic for Applications window and press the F5 key on your keyboard to run the code.
This comment was minimized by the moderator on the site
Fantastic - many thanks!!!
Rated 5 out of 5
This comment was minimized by the moderator on the site
Thank you, is there a solution to change the picture of the author in the comments into an anonymous one?
This comment was minimized by the moderator on the site
Hi Niccolo,
Sorry can't help you with this problem.
This comment was minimized by the moderator on the site
Cool thanks!
This comment was minimized by the moderator on the site
Boas. No meu caso funcionou muito bem com os "comentarios", mas não alterou o nome de quem fez as "alterações" ao texto. Alguém consegue efectuar a alteração do autor para todos os tipos de marcações: comentarios, alterações, formatação...
This comment was minimized by the moderator on the site
Microsoft ist schon ein Schrott. Je neuer die Versionen sind, umso weniger findet man die Lösung. Wo ändere ich schlichtweg den Autor grundsätzlich. Bei mir wird nichts geändert und ich suche seit über 2 Stunden... einfach nur Schrott das UX von Microschrott
This comment was minimized by the moderator on the site
Excellent information in this post and also in the comments. Thank you everyone.
This comment was minimized by the moderator on the site
Great, worked very well ... thanks
This comment was minimized by the moderator on the site
FOR THOSE WHO WANNA CHANGE AUTHORS ONLY OF CERTAIN COMMENTSOpen your doc with an archiver (e.g. ZIP), go to word folder, find comments.xml file, extract, open with notepad, edit accordingly (ctrl+H to find and change current author and initials to the ones you desire), save, get the file back to word folder in the zip, et voila
This comment was minimized by the moderator on the site
Cette astuce ne fonctionne pas avec toutes les versions d'office
This comment was minimized by the moderator on the site
Bonjour
Cette macro fonctionne bien, mais pour anonymiser l'auteur des corrections dans un texte, il faudrait, en plus de l'auteur des commentaires, pouvoir changer le nom au niveau de marques de révision, et tel n'est pas le cas.
Auriez-vous une solution?
Merci d'avance.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations