Как изменить имя автора всех комментариев в Excel?

Когда вы вставляете комментарии в рабочий лист, имя автора комментария автоматически добавляется в комментарий, за которым следует двоеточие. Иногда вам может понадобиться изменить имя автора комментария. Как это сделать? Вы можете изменить имя автора комментария в Excel следующими способами.

Измените имя автора по умолчанию для всех новых комментариев с помощью настройки параметров Excel

Быстро измените имя автора всех существующих комментариев в активном или во всех листах с помощью Kutools для Excel

Измените имя автора всех существующих комментариев во всей книге с помощью кода VBA

Измените имя автора по умолчанию для всех новых комментариев с помощью настройки параметров Excel

Вы можете изменить имя пользователя Excel, чтобы изменить имя автора всех новых комментариев, которые вы будете вставлять.

1. Нажмите Файл > Параметры в Excel 2010/2013/2016, или вы можете нажать кнопку Office > Параметры Excel > Общие в Excel 2007.

2. В диалоговом окне Параметры Excel нажмите Общие в левой панели, затем прокрутите до раздела Персонализация вашей копии Microsoft Office в правой панели, затем замените старое Имя пользователя на новое, которое вам нужно. И, наконец, нажмите кнопку ОК. См. скриншот:

С этого момента, когда вы будете вставлять новые комментарии в свой рабочий лист, имя автора будет новым, как вы указали выше. Однако имя автора старых комментариев останется прежним.

Легко найдите и замените имя автора всех существующих комментариев на новое с помощью Kutools для Excel

Помимо вышеупомянутого метода, здесь я рекомендую вам инструмент Удаление/Добавление имени пользователя в комментарии из Kutools для Excel. С помощью этого инструмента вы можете легко изменить имя автора всех существующих комментариев на новое не только в активном листе, но и во всей книге.

1. Перейдите на лист, внутри которого вы хотите изменить имя автора всех комментариев, затем нажмите Kutools > Дополнительно > Удаление/Добавление имени пользователя в комментарии. См. скриншот:

2. В диалоговом окне Удаление/Добавление имени пользователя в комментарии вам необходимо настроить следующее:

Во-первых, удалите имя автора из всех комментариев в указанной области.

• (1) В раскрывающемся списке Область, если вы хотите изменить имена авторов только в текущем листе, выберите опцию Текущий лист. Для изменения имен авторов во всей книге выберите опцию Все листы.
• (2) Выберите опцию Удалить имена пользователей из комментариев.
• (3) Нажмите кнопку Применить.
• (4) В появившемся диалоговом окне нажмите кнопку ОК.

Затем добавьте новое имя автора ко всем комментариям в указанной области.

• (1) Введите новое имя автора комментариев в поле Имя пользователя, а затем выберите опцию Добавить имена пользователей в комментарии;
• (2) Нажмите кнопку Применить;
• (3) В появившемся диалоговом окне нажмите кнопку ОК;
• (4) Нажмите кнопку Закрыть, чтобы закрыть диалоговое окно.

Использование кода VBA для преобразования всех отрицательных чисел диапазона в положительные

Если вы хотите изменить имя автора всех существующих комментариев во всей книге, следующий код VBA поможет вам:

1. Пожалуйста, одновременно нажмите клавиши Alt + F11, чтобы открыть Microsoft Visual Basic для приложений. В окне Microsoft Visual Basic для приложений нажмите Вставить > Модуль, затем скопируйте и вставьте следующий код в окно модуля:

Код 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 с отображением старого имени автора комментария в текстовом поле, пожалуйста, нажмите кнопку ОК. См. скриншот:

3. Затем появится еще одно диалоговое окно KutoolsforExcel, пожалуйста, введите новое имя автора комментария, которое вам нужно, в текстовое поле, а затем нажмите кнопку ОК. См. скриншот:

Теперь все имена авторов существующих комментариев сразу же изменятся на новое имя во всей книге.

Примечание: Этот метод не будет работать для новых комментариев, которые вы вставляете.

Демонстрация: Изменение имени автора всех комментариев с помощью Kutools для Excel

Связанные статьи