user_mobilelogo

 L'aide de Word donne la formule pour le test de lisibilité de Flesch :

206,835 - (1 015 x ASL) - (84,6 x ASW)

où :

ASL = longueur moyenne des phrases
(nombre de mots divisé par le nombre de phrases)
ASW = nombre moyen de syllabes par mot
(nombre de syllabes divisé par le nombre de mots)


La formule en soi ne serait pas très compliquée à programmer mais il n'y a pas de moyen simple de compter les syllabes (il faut faire une approximation par le nombre de caractères par mot).

La macro suivante affichera dans le volet Exécution de Visual Basic le nombre de mots, de caractères, de paragraphes, de phrases, dans le document. Elle affichera également le nombre moyen de phrases par paragraphe, le nombre de mots par phrase, et le nombre de caractères par mot.

Sub test()
For Each st In ActiveDocument.ReadabilityStatistics
 MsgBox st.Name & " - " & st.Value
Next st
End Sub
 

Par ailleurs, Word affichera ces mêmes information dans un tableau nommé Statistiques de lisibilité après avoir lancé le vérificateur orthographique (F7). Notez que l'option Afficher les statistiques de lisibilité doit être cochée dans les options de grammaire et orthographe :

 

 

Statistiques

Aujourd'hui169
Total depuis 200411533154

5
visiteurs actuellement en ligne

15 novembre 2019