Classe ReadabilityStatistic - estatísticas de legibilidade (Word VBA)

A classe ReadabilityStatistic representa uma das estatísticas de legibilidade de um documento ou intervalo. O objeto ReadabilityStatistic é um membro da coleção ReadabilityStatistics. Para usar uma variável de classe ReadabilityStatistic, ela primeiro precisa ser instanciada por exemplo

Dim rsc as ReadabilityStatistic
Set rsc = ActiveDocument.Range.ReadabilityStatistics(Index:=1)

For Each

Aqui está um exemplo de processamento dos itens ReadabilityStatistic em uma coleção.

Dim rsc As ReadabilityStatistic
For Each rsc In ActiveDocument.Range.ReadabilityStatistics
	
Next rsc

Name

Retorna o nome do objeto especificado. Cadeia de caracteressomente leitura.

Dim strName As String
strName = ActiveDocument.Range.ReadabilityStatistics(1).Name

Value

Retorna o valor da estatística de gramática. Long somente leitura.

ActiveDocument.CheckGrammar 
MsgBox ActiveDocument.ReadabilityStatistics( _ 
 "Flesch Reading Ease").Value