ShowTip Property Example

This example shows the screen tip for the first comment in the active document.

If ActiveDocument.Comments.Count >= 1 Then
    ActiveDocument.Comments(1).ShowTip = True
End If

This example shows the screen tip for the next comment in the active document.

If ActiveDocument.Comments.Count >= 1 Then
    With Selection
        .GoTo What:=wdGotoComment, Which:=wdGotoNext
        .MoveEnd Unit:=wdWord, Count:=1
        .Comments(1).ShowTip = True
    End With
End If