Reviewers Property

expression.Reviewers

expression    Required. An expression that returns a View object.

Remarks

The Reviewers object is a global list of all reviewers, regardless of whether the reviewer reviewed the document displayed in the specified window.

Example

This example hides all revisions and comments in the document and displays only revisions and comments made by "Jeff Smith."

Sub HideRevisions()
    Dim revName As Reviewer
    With ActiveWindow.View
        .ShowRevisionsAndComments = False
        .ShowFormatChanges = True
        .ShowInsertionsAndDeletions = True

        For Each revName In .Reviewers
            revName.Visible = True
        Next

        .Reviewers.Item("Jeff Smith").Visible = True
    End With
End Sub