How to Extract Comment information from Word VBA

How to Extract Comments Text and Related Information from Word Document using VBA

Here is a hint of accessing the comments and related information using VBA

Sub Get_Comment_Information()

Dim oComment As Comment
Dim oCommentRange As Range

For i1 = 1 To ActiveDocument.Comments.Count
Set oComment = ActiveDocument.Comments(i1)
Set oCommentRange = oComment.Scope.Paragraphs(1).Range
Debug.Print "Page : " & oCommentRange.Information(wdActiveEndPageNumber) & vbTab _
& "Line : " & oCommentRange.Information(wdFirstCharacterLineNumber) & vbTab

Next i1

End Sub