Counting Words in Comments

by Allen Wyatt
(last updated May 26, 2018)

1

Linda wonders if there is a way to count the number of words that are within the comments (and only the comments) in a document.

The easiest way to accomplish this task is to use a macro. This is because Word makes available to VBA a Comments collection which includes all of the comments in the document. All you need to do is to step through each comment and then look at the Count property for the Words collection for the comment, in this manner:

Sub CommentWordCount1()
    Dim c As Comment
    Dim lWords As Long
    Dim sMsg As String

    For Each c In ActiveDocument.Comments
        lWords = lWords + c.Range.Words.Count
    Next c

    sMsg = "There are " & ActiveDocument.Comments.Count
    sMsg = sMsg & " comments in the document. & vbCrLf & vbCrLf
    sMsg = sMsg & "Word count: " & lWords
    MsgBox sMsg
End Sub

If you prefer, you could also use the ComputeStatistics method to come up with the word counts, like this:

Sub CommentWordCount2()
    Dim c As Comment
    Dim lWords As Long
    Dim sMsg As String

    For Each c In ActiveDocument.Comments
        lWords = lWords + c.Range.ComputeStatistics(wdStatisticWords)
    Next c

    sMsg = "There are " & ActiveDocument.Comments.Count
    sMsg = sMsg & " comments in the document. & vbCrLf & vbCrLf
    sMsg = sMsg & "Word count: " & lWords
    MsgBox sMsg
End Sub

When you compare the results from the two macros, you may notice a difference in word counts. This is because of the way that the CompuStatistics method treats punctuation when doing its calculations. You'll want to compare the results and, based on the characteristics of the information in your comments, choose the approach that best suits your needs.

Note:

If you would like to know how to use the macros described on this page (or on any other page on the WordTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (13531) applies to Microsoft Word 2007, 2010, 2013, and 2016.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. ...

MORE FROM ALLEN

Making Word Stop at the End of a Document when Reviewing Changes

The Track Changes tool is a great help when you want to see what edits have been made to a document. When you review ...

Discover More

Creating Dependent Drop-Lists

Drop-down lists are handy in an Excel worksheet, and you they can be even more handy if a selection in one drop-down ...

Discover More

Omitting Page Numbers on Some Pages

Excel doesn't allow for as robust of headers and footers as Word does. Even so, there are some things you can do to ...

Discover More

Comprehensive VBA Guide Visual Basic for Applications (VBA) is the language used for writing macros in all Office programs. This complete guide shows both professionals and novices how to master VBA in order to customize the entire Office suite for their needs. Check out Mastering VBA for Office 2010 today!

More WordTips (ribbon)

Changing the User Name in Existing Comments

Want to change the name that Word associates with various comments previously added to your document? Here are some ideas ...

Discover More

Getting Rid of "Comment" in Comments

When you add a comment to a document, Word presents that comment in a very specific way. If you want to change the way in ...

Discover More

Adding Comments to Your Document

If you would like to add non-printing notes to your document, the Comments feature is one way of doing that. Here's how ...

Discover More
Subscribe

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

What is 3 + 0?

2020-06-23 10:34:35

Bartosz

well done! the question is whether it is possible to count all the characters in the entire document and in the comments in one script?


This Site

Got a version of Word that uses the ribbon interface (Word 2007 or later)? This site is for you! If you use an earlier version of Word, visit our WordTips site focusing on the menu interface.

Newest Tips
Subscribe

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.