Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / November 2004

Tip: Looking for answers? Try searching our database.

Macro to summarize comments

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
G.R. Toro - 23 Nov 2004 23:54 GMT
Hi,

I have a large Word document, where I have added a number of comments using
the comment feature (I use Word XP).  I would like to know if anyone has
writen vba to summarize those comments.

The macro I envision would create a new document that would contain the
comments, together with some way to preserve their context (such as the
affected paragraph together with some indication of which page the paragraph
came from).  Ideally, this macro would do the same with changes introduced
with "track changes" feature.

Has anyone written such a macro?   Any pointers on how to do it?

Thanks,

Gabriel
Helmut Weber - 24 Nov 2004 10:42 GMT
Hi,
> Any pointers on how to do it?
well, probably the most important thing, you need,
is the reference property of "comment".
Like:
Dim oCmm As Comment
For Each oCmm In ActiveDocument.Range.Comments
MsgBox oCmm.Reference.Words(1)
MsgBox oCmm.Reference.Paragraphs(1).Range.Text
MsgBox oCmm.Reference.Information(wdActiveEndPageNumber)
MsgBox oCmm.Range.Text
'... etc
Next
As far as tracked changes are concerned,
I'd expect, you would collect all kinds
of single inserted or deleted letters,
spaces or punctuation signs.
---
Greetings from Bavaria, Germany
Helmut Weber, MVP
"red.sys" & chr(64) & "t-online.de"
Word 2002, Windows 2000
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.