Alterando o nome do usuário depois que os comentários foram adicionados no Word 2016 Mac

Question

Eu fiz alguns comentários no arquivo de palavras em que estou trabalhando. No entanto, percebi que meu nome de usuário estava listado como "Usuário do Microsoft Office". Eu mudei isso para o meu próprio nome, mas os comentários ainda estão listados como "Microsoft Office User". Existe alguma maneira de fazer o meu nome aparecer nos comentários antigos?

Word versão 15.16, em El Capitan.

    

Answer 1

Existe alguma maneira de mostrar meu nome nos comentários antigos?

When a comment is created, it is added to the Comments collection, which can be accessed through VBA. Each comment has Author and Initial properties that, respectively, represent the comment author's name and initials. The following macro is an example of how these can be changed:

Sub ChangeCommentAuthor()
    Dim J As Integer
    Dim sAuthorname As String
    Dim sInitial As String

    If Selection.Comments.Count = 0 Then
        MsgBox "No comments in your selection!", _
          vbCritical + vbOKOnly, "Cannot perform action"
        Exit Sub
    End If

    sAuthorname = InputBox("New author name?", _
      "Comments Author Name")
    If sAuthorname = "" Then End

    sInitial = InputBox("New author initials?", _
      "Comments Initials")
    If sInitial = "" Then End

    With Selection
        For J = 1 To .Comments.Count
            .Comments(J).Author = sAuthorname
            .Comments(J).Initial = sInitial
        Next J
    End With
End Sub

1. Make a selection that contains the comment you want to modify (select the text in the main document that includes the comment indicator)

2. Run the macro.

3. Enter a new name and initials when prompted.

4. When the macro is done running, it may not appear like anything has changed.

5. If you save your document and reload it, you'll note that the comment author names have been changed as you indicated.

Fonte Alterando o nome de usuário em comentários existentes