Переименование инициалов в словарных комментариях

Question

Есть ли способ пройти и изменить инициалы комментариев, сделанных в текстовом документе?

Answer 1

Этот макрос VBA изменит все существующие инициалы комментариев.

Sub ChangeInitialsAndAuthor()
    For Each MyComment In ActiveDocument.Comments
        If MyComment.Initial = "old" Then MyComment.Initial = "new"
    Next
End Sub

Как использовать макрос

• Откройте файл Word и нажмите ALT+F11, чтобы открыть редактор VBA.
• Вставьте новый модуль и скопируйте и вставьте код выше
• Замените old на ваши старые инициалы и new на ваши новые инициалы
• Запустите макрос с F5 из редактора или ALT+F8 из слова

Answer 2

Вы можете сделать это таким образом, но это изменит имя / инициалы, используемые во ВСЕХ продуктах Microsoft Office.

Вырезано из файла справки Office 2007.

На вкладке «Обзор» в группе «Отслеживание» щелкните стрелку рядом с «Отслеживать изменения», а затем нажмите «Изменить имя пользователя».