ShowBy Property Example

The following example displays comments made by Don Funk.

If ActiveDocument.Comments.Count >= 1 Then
    ActiveDocument.ActiveWindow.View.SplitSpecial = wdPaneComments
    ActiveDocument.Comments.ShowBy = "Don Funk"
End If