Word VBA教程:Author属性

应用于 Comment对象的 Author属性。

返回或设置某一批注的作者姓名。String 类型,可读写。

expression.Author

expression   必需。该表达式返回以上一个对象。

说明

修改一个批注的作者将改变文档中所有批注的作者。

应用于 Revision对象的 Author属性。

返回或设置完成指定修订的用户姓名。String 类型,只读。

expression.Author

expression   必需。该表达式返回以上一个对象。

VBA示例

当应用于 Comment对象时。

本示例设置作者姓名,并且为活动文档的第一个批注设置作者姓名缩写。


If ActiveDocument.Comments.Count >= 1 Then
    With ActiveDocument.Comments(1)
        .Author = "Joe Smith"
        .Initial = "JAS"
    End With
End If

本示例返回所选内容的第一个批注的作者姓名。


Dim strAuthor as String
If Selection.Comments.Count >= 1 Then _
    strAuthor = Selection.Comments(1).Author

当应用于 Revision对象时。

本示例显示所选部分中的第一节的第一处修订的作者姓名。


Dim rngSection as Range
Set rngSection = Selection.Sections(1).Range
MsgBox "Revisions made by " & rngSection.Revisions(1).Author

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号