Results 1 to 6 of 6
  1. #1
    New Lounger
    Join Date
    Jan 2001
    Location
    UK
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Removing comments (Word 97/ NT 4)

    We have documents created in Word 97 that have had comments added by numerous authors. How can we remove the comments so that we can act on them and update the document, but without leaving the untidyness of old comments?

    When we use the 'delete comments' command nothing happens, presumably because the person using 'delete comments' is not the person who created the comment.

    Thank you in advance,

    Glenn.

  2. #2
    Super Moderator
    Join Date
    Dec 2000
    Location
    New York, NY
    Posts
    2,970
    Thanks
    3
    Thanked 29 Times in 27 Posts

    Re: Removing comments (Word 97/ NT 4)

    Glenn,

    Based on a quick test (in Word 2000, should be the same in Word 97), it appears that any user should be able to delete any other user's comments, unless the document happens to be protected for comments.

    What command are you using to delete the comment? - in particular, if you show the Reviewing toolbar, is the Delete Comment icon grayed out - that would indicate the document is protected.
    If the document is protected for comments, then you'd need to turn the protection off in order to delete the comments; it's also possible for the protection to be passworded in which case you'd need that.

    The following macro will delete all comments in a document that is not protected for comments:

    <pre>Public Sub RemoveAllComments()
    Dim n As Long
    Dim oComments As Comments
    Set oComments = ActiveDocument.Comments
    For n = oComments.Count To 1 Step -1
    oComments(n).Delete
    Next 'n
    Set oComments = Nothing
    End Sub
    </pre>

    Gary

  3. #3
    New Lounger
    Join Date
    Jan 2001
    Location
    UK
    Posts
    5
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Removing comments (Word 97/ NT 4)

    Thanks Gary

    Your reply set us off on a different and fruitful track.

    In short we tried protecting the document and then unprotecting it. This made us able to remove the comments without problem!

    Thank you again for such a prompt response.

    Best regards,

    Glenn.

  4. #4
    Lounger
    Join Date
    Apr 2002
    Posts
    38
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Removing comments (Word 97/ NT 4)

    Gary:

    Thanks! This works really well, but for Word 97 is there a way it can be modified so that it only removes comments created by single reviewer?

    Jerry

  5. #5
    Super Moderator jscher2000's Avatar
    Join Date
    Feb 2001
    Location
    Silicon Valley, USA
    Posts
    23,112
    Thanks
    5
    Thanked 93 Times in 89 Posts

    Re: Removing comments (Word 97/ NT 4)

    This should do it:
    <pre>Public Sub RemoveCommentsByAuthor(strAuthor As String)
    Dim n As Long
    Dim oComments As Comments
    Set oComments = ActiveDocument.Comments
    For n = oComments.Count To 1 Step -1
    If LCase(oComments(n).Author) = strAuthor Then
    oComments(n).Delete
    End If
    Next 'n
    Set oComments = Nothing
    End Sub

    Sub TestIt()
    RemoveCommentsByAuthor "joe blow"
    End Sub</pre>

    The comparison is case sensitive, so I made everything lower case to minimize the effect of typos.

  6. #6
    Lounger
    Join Date
    Apr 2002
    Posts
    38
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: Removing comments (Word 97/ NT 4)

    Thanks so much!

    It works perfectly in Word 97 and Word 2002.

    Jerry

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •