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
Posts
Hello,
ReplyDeleteI *really* need to be able to harvest comments from a number of Word documents and put them into an Access database. Unfortunately, I am not a VBA programmer. Any further code or clues you can offer would be most gratefully appreciated.
Thank you,
Cynthia
Cynthia .. You need to loop throught the folder containing the documents - Dir function should be helpful for that. Open each document using Documents.Open and then run the above code snippet
ReplyDeleteHi , Can Any body tell me - how to extract Word Document Comments into Excel - Word Comments into Excel using Excel VBA Macros
ReplyDeleteNice and informative article. keep it up your good work
ReplyDeletePlease visit: TBI Technologies