Please Note: This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: Only Showing Readability Statistics.
by Allen Wyatt
(last updated June 30, 2016)
When you do a grammar check on your document, the very last step performed by Word is to display a set of readability statistics that you can use to analyze the presentation of your content. There may be times when you want to only display the readability statistics, without going through the complete grammar check first. Unfortunately, Word does not provide a way to do this. You can, however, create a macro that will display the readability statistics quite nicely. The heart of such a macro would be the ReadabilityStatistics collection.
To get an idea how such a macro could be written, consider the following single-line macro:
Sub CheckTest() MsgBox ActiveDocument.Content.ReadabilityStatistics(9).Value End Sub
This macro displays a number that represents the Flesch Reading Ease value, ninth member of the ReadabilityStatistics collection. There are 10 individual elements in the collection, as follows:
|5||Sentences per Paragraph|
|6||Words per Sentence|
|7||Characters per Word|
|9||Flesch Reading Ease|
|10||Flesch-Kincaid Grade Level|
To display all ten statistics (as would be done in a complete grammar check of your document), all you need to do is have your macro step through the various members of the collection and display their values. The following macro does just that:
Sub Readability() Dim DocStats As String Dim MBTitle As String Dim J As Integer MBTitle = "Readability Statistics" DocStats = "" With ActiveDocument.Content For J = 1 to 10 DocStats = DocStats & .ReadabilityStatistics(J) DocStats = DocStats & ": " DocStats = DocStats & .ReadabilityStatistics(J).Value DocStats = DocStats & vbCrLf Next J End With MsgBox DocStats, vbOKOnly, MBTitle End Sub
When you run the macro, understand that it takes a bit of time to run. In fact, depending on the speed of your system, the length of your document, and its complexity, it can take quite a bit of time to run. Be patient; once the ten statistics are completed, they are displayed on the screen.
WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (1784) applies to Microsoft Word 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Word (Word 2007 and later) here: Only Showing Readability Statistics.
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!
Some people feel that your writing can be better if you remove gender-specific language it may contain. Here's how you can ...Discover More
Text boxes are a common design element in a document. You may wonder if the text you place in a text box can be spell ...Discover More
When you are typing in a document, Word normally checks your spelling in the background, marking possible spelling errors as ...Discover More
FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."
Got a version of Word that uses the menu interface (Word 97, Word 2000, Word 2002, or Word 2003)? This site is for you! If you use a later version of Word, visit our WordTips site focusing on the ribbon interface.