Selection.Words (Word)
Renvoie une collection Words qui représente tous les mots d’une sélection.
Les marques de ponctuation et de paragraphe d'un document sont incluses dans la collection Words.
MsgBox "There are " & Selection.Words.Count & " words."