Deleting all comments in a Word 2000 document

[nuria]

Hi
Anyone have a method of doing this, other than one by one???
I have about 2000 comments
Thanks in advance

 

[Jay Freedman]

Hi, Nuria,

Run this macro:

Public Sub DeleteAllComments()
Do While ActiveDocument.Comments.Count > 0
ActiveDocument.Comments(1).Delete
Loop
End Sub

See http://www.mvps.org/word/FAQs/MacrosVBA/CreateAMacro.htm if you need
instructions.

 

[Jay Freedman]

Thanks, Jay.
Sorry to be a novice at macros... but... how exactly do you do it??
Thanks,
nuria

Did you read the page at
http://www.mvps.org/word/FAQs/MacrosVBA/CreateAMacro.htm that I
mentioned? It gives step by step instructions.