跳至主要内容

如何在 Excel 中更改所有批注的作者名称?

Author: Tech Support Last Modified: 2025-07-31

在工作表中插入批注时,批注作者的名称会自动插入到批注中,并在其后跟随一个冒号。有时,您可能希望更改批注作者的名称。该如何操作呢?您可以按照以下方法在 Excel 中更改批注作者的名称。

A screenshot showing comments in an Excel worksheet with author names replaced

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

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

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


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

您可以更改 Excel 用户名,从而更改所有新插入批注的作者名称。

1. 在 Excel 2010/2013/2016 中点击 文件 > 选项,或者在 Excel 2007 中点击 Office 按钮 > Excel 选项 > 常规

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

A screenshot of the Excel Options dialog box to change the default author name

从现在开始,当您向工作表中插入新批注时,作者名称将变为上面指定的新名称。但是,旧批注的作者名称仍保持不变。


使用 Kutools for Excel 轻松查找并替换所有现有批注的作者名称为新名称

除了上述方法外,这里我推荐您使用 Kutools for Excel 的“去除/添加用户名到批注”工具。使用此工具,您可以轻松地将所有现有批注的作者名称更改为所需的新名称,不仅适用于当前工作表,还适用于整个工作簿。

Kutools for Excel 提供了超过 300 种高级功能,简化复杂任务,提升创造力与效率。 通过集成 AI 能力,Kutools 能够精准自动执行任务,让数据管理变得轻松简单。Kutools for Excel 的详细信息...         免费试用...

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

A screenshot of the Kutools Remove/Add User Name in Comment tool in Excel

2. 在“去除/添加用户名到批注”对话框中,您需要按如下方式配置:

首先,从指定范围内的所有批注中删除作者名称。
  • (1) 在 范围 下拉列表中,如果您只想更改当前工作表中的作者名称,请选择 当前工作表 选项。若要更改整个工作簿中的作者名称,请选择 全部工作表 选项。
  • (2) 选择 去除批注中的用户名 选项。
  • (3) 点击 应用 按钮。
  • (4) 在弹出的对话框中,点击 确定 按钮。
然后,将新的作者名称添加到指定范围内的所有批注中。
  • (1) 在 用户名 框中输入批注的新作者名称,然后选择 给批注添加用户名 选项;
  • (2) 点击 应用 按钮;
  • (3) 在弹出的对话框中,点击 确定 按钮;
  • (4) 点击 关闭 按钮以关闭对话框。

A GIF showing how to use Kutools for Excel to change comment author names

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 对话框,显示旧的批注作者名称,请点击 确定 按钮。请参见截图:

A screenshot of the KutoolsforExcel dialog box to input the old author name for comments

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

A screenshot of the KutoolsforExcel dialog box to input the new author name for comments

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

A screenshot showing comments in an Excel worksheet with author names replaced

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


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

Kutools for Excel:超过 300 种实用工具触手可及!永久免费享受 AI 功能!立即下载!