Range.ReadabilityStatistics (Word)

Returns a ReadabilityStatistics collection that represents the readability statistics for the specified document or range.

For information about returning a single member of a collection, see Returning a Single Object from a Collection.

For Each rs In Documents(1).ReadabilityStatistics 
 Msgbox rs.Name & " - " & rs.Value 
Next rs