Comment.Scope (Word)

Gibt ein Range -Objekt zurück, das den Textbereiche darstellt, die durch den angegebenen Kommentar gekennzeichnet sind.

If Selection.Comments.Count >= 1 Then 
 Set myRange = Selection.Comments(1).Scope 
 MsgBox myRange.Text 
End If