☰

在 Word 2016 Mac 中添加注释后更改用户名

tag-icon • tag-icon microsoft-word osx-el-capitan
在 Word 2016 Mac 中添加注释后更改用户名

我在正在处理的 Word 文件中做了一些注释。但是，我发现我的用户名被列为“Microsoft Office 用户”。我将其更改为自己的姓名，但注释仍然列为“Microsoft Office 用户”。有什么方法可以让我的名字显示在旧注释上吗？

El Capitan 上的 Word 版本 15.16。

答案1

有什么办法可以让我的名字出现在旧评论中？

创建注释后，它将被添加到 Comments 集合中，可以通过 VBA 访问该集合。每个注释都有 Author 和 Initial 属性，分别表示注释作者的姓名和姓名首字母。以下宏是如何更改这些内容的示例：

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. 选择包含要修改的注释的内容（选择主文档中包含注释指示符的文本）

  2. 运行宏。

  3. 出现提示时输入新姓名和姓名首字母。

  4. 当宏运行完成后，可能看起来好像没有任何变化。

  5. 如果您保存文档并重新加载，您会注意到评论作者姓名已按您所指示进行更改。

来源更改现有评论中的用户名

相关内容