KutoolsforOffice — 一套方案,五大工具。事半功倍。

如何在 Excel 中批量修改所有批注的作者姓名?

作者技术支持修改日期

在工作表中插入批注时,系统会自动将批注作者的姓名添加到批注开头,并后跟一个冒号。有时,您可能希望更改该作者姓名。该如何操作?请按照以下方法在 Excel 中修改批注作者的姓名。

显示 Excel 工作表中评论的截图,作者姓名已被替换

通过配置 Excel 选项更改所有新建批注的默认作者名称

使用 Kutools for Excel 快速更改活动工作表或所有工作表中所有现有批注的作者名称

通过 VBA 代码更改整个工作簿中所有现有批注的作者名称


通过配置 Excel 选项,更改所有新建批注的默认作者姓名

您可以更改 Excel 用户名,从而修改所有新建批注中显示的作者姓名。

1. 单击文件 > 选项(适用于 Excel 2010/2013/2016),或单击 Office按钮中的 Excel 选项,再选择常用(适用于 Excel 2007)。

2. 在 Excel 选项对话框中,单击左侧栏中的“常规”,然后滚动至右侧窗格中的 个性化您的 Microsoft Office 副本部分,将旧的用户名替换为您所需的新姓名,最后单击确定按钮。参见截图:

用于更改默认作者姓名的 Excel 选项对话框截图

从现在起,您在工作表中插入的新批注将显示上述指定的新作者姓名,而原有批注的作者姓名则保持不变。


使用 Kutools for Excel 轻松将所有现有批注的作者姓名更改为新姓名

除了上述方法外,我在此向您推荐 Kutools for Excel批注中移除/添加用户名功能。借助此功能,您不仅可以轻松将所有现有批注的作者姓名更改为所需的新姓名,还能应用于整个工作簿,而不局限于当前工作表。

Kutools for Excel 提供超过 300 项高级功能,简化复杂任务,提升创造力与效率。结合 AI 功能,Kutools 以精准自动化任务,让数据管理变得轻而易举。有关 Kutools for Excel 的详细信息……         免费试用……

1. 切换到要更改所有批注作者姓名的工作表,然后点击 Kutools > 更多 > 批注中移除/添加用户名。参见截图:

Kutools 在 Excel 中用于移除/添加评论用户名的工具截图

2. 在批注中移除/添加用户名对话框中,您需按以下方式配置:

首先,从作用范围内的所有批注中移除作者姓名。
  • (1)在范围中,若只想更改当前工作表中所选的作者名称,请选择当前工作表选项;若要更改整个工作簿中的作者名称,请选择所有工作表选项。
  • (2)选择从批注中移除用户名选项。
  • (3)单击应用按钮。
  • (4)在弹出的对话框中,单击确定按钮
然后,向作用范围中的所有批注添加新的作者姓名。
  • (1)在用户名框中输入批注的新作者名称,然后选择向批注中添加用户名选项;
  • (2)单击应用按钮;
  • (3)在弹出的对话框中,单击确定按钮;
  • (4)单击关闭按钮,即可关闭对话框。

展示如何使用 Kutools for Excel 更改评论作者姓名的 GIF 动图

Kutools for Excel——通过 300 多款必备工具大幅提升 Excel 效率,让您的工作更快、更轻松,并借助 AI 功能实现更智能的数据处理,全面提升生产力!立即获取


使用 VBA 代码将某个区域内的所有负数转换为正数

如果您想更改整个工作簿中所有现有批注的作者姓名,以下 VBA 代码可为您提供帮助:

1. 请同时按下 Alt + F11 键,即可打开 Microsoft Visual Basic for Applications。在 Microsoft Visual Basic for Applications 窗口中,单击插入 > 模块,然后将以下代码复制并粘贴到模块窗口中:

VBA 代码:更改整个工作簿中所有现有批注的作者姓名

Sub ChangeCommentName()
'Updateby20140509
Dim xWs As Worksheet
Dim xComment As Comment
Dim oldName As String
Dim newName As String
xTitleId = "KutoolsforExcel"
oldName = InputBox("Old Name", xTitleId, Application.UserName)
newName = InputBox("New Name", xTitleId, "")
For Each xWs In Application.ActiveWorkbook.Worksheets
    For Each xComment In xWs.Comments
        xComment.Text (Replace(xComment.Text, oldName, newName))
    Next
Next
End Sub 

2. 按 F5 键运行代码后,将弹出一个 KutoolsforExcel 对话框,文本框中显示了旧的批注作者姓名,请单击确定按钮。参见截图:

KutoolsforExcel 对话框截图,用于输入评论的旧作者姓名

3. 接着会弹出另一个 Kutools for Excel 对话框,请在文本框中输入所需的新批注作者姓名,然后单击确定按钮。参见截图:

KutoolsforExcel 对话框截图,用于输入评论的新作者姓名

现在,整个工作簿中所有现有批注的作者姓名均已立即更新为新名称。

显示 Excel 工作表中评论的截图,作者姓名已被替换

注意:此方法对您新建并插入的批注无效。


演示:使用 Kutools for Excel 更改所有批注的作者姓名

Kutools for Excel:超过 300 款实用工具触手可及!畅享 AI 驱动功能,让工作更智能、更高效!立即下载!