Partager via


Méthode Range.ComputeStatistics (Word)

Renvoie un type Long qui représente une statistique basée sur le contenu de la plage spécifiée.

Syntaxe

expression. ComputeStatistics( _Statistic_ )

expression Obligatoire. Variable qui représente un objet Range.

Parameters

Nom Requis/Facultatif Type de données Description
Statistic Requis WdStatistic Type de statistique à calculer.

Remarques

Il se peut que certaines des constantes énumérées ci-dessus ne soient pas disponibles, selon la prise en charge de langue (anglais (États-Unis), par exemple) que vous avez sélectionnée ou installée.

La statistique retournée pour Table.Cell Range est inexacte en raison du marqueur de fin de cellule qui interfère avec la statistique. La troncation de la plage pour supprimer le marqueur de fin de cellule entraîne la valeur Statistique correcte.

Set cell = Documents("Report.doc").Tables(1).Cell(1, 1)
Set myRange = cell.Range
lineCount = myRange.ComputeStatistics(Statistic:=wdStatisticLines) 'Returns 0
rng.MoveEnd wdCharacter, -1 
lineCount = myRange.ComputeStatistics(Statistic:=wdStatisticLines)
MsgBox "The first cell contains " & lineCount _ 
 & " lines."

Exemple

Cet exemple montre comment afficher le nombre de mots et de caractères du premier paragraphe du document « Report.doc ».

Set myRange = Documents("Report.doc").Paragraphs(1).Range 
wordCount = myRange.ComputeStatistics(Statistic:=wdStatisticWords) 
charCount = myRange.ComputeStatistics(Statistic:=wdStatisticCharacters) 
MsgBox "The first paragraph contains " & wordCount _ 
 & " words and a total of " & charCount & " characters."

Voir aussi

Range, objet

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.