Objet Words (Word)

Une collection de mots dans une sélection, une plage ou un document. Chaque élément dans la collection Words est un objet Range qui représente un seul mot. Il n'existe pas d'objet Word.

Remarques

Utilisez la propriété Words pour renvoyer l'objet Words. L'exemple de code suivant affiche le nombre de mots actuellement sélectionné.

MsgBox Selection.Words.Count & " words are selected"

Utilisez des mots (Index), où Index est le numéro d'index, pour renvoyer un objet Range qui représente un seul mot. Le numéro d'index représente la position du mot dans la collection Words. L'exemple de code suivant met en forme le premier mot de la sélection en italique de 24 points.

With Selection.Words(1) 
 .Italic = True 
 .Font.Size = 24 
End With

L'élément de la collection de mots inclut le mot et les espaces après le mot. Pour enlever ces espaces, utilisez la fonction Visual Basic RTrim, par exemple RTrim(ActiveDocument.Words(1)). L'exemple de code suivant sélectionne le premier mot (et ses espaces de fin) dans le document actif.

ActiveDocument.Words(1).Select

Si la sélection correspond au point d'insertion et qu'elle est immédiatement suivie par un espace, Selection.Words(1) fait référence au mot qui précéde la sélection. Si la sélection correspond au point d'insertion et qu'elle est immédiatement suivie par un caractère, Selection.Words(1) se rapporte au mot qui suit la sélection.

La propriété Count pour cette collection dans un document renvoie le nombre d'éléments dans le niveau principal uniquement. Pour compter les éléments dans d'autres articles utilisent la collection avec l'objet Range. En outre, la propriété Count contient des marques de ponctuation et de paragraphe dans le total. Pour compter les mots réels d'un document, utilisez la boîte de dialogue Statistiques. L’exemple de code suivant montre comment récupérer le nombre de mots du document actif, puis attribuer la valeur à la variable numWords.

Set temp = Dialogs(wdDialogToolsWordCount) 
' Execute the dialog box to refresh its data. 
temp.Execute 
numWords = temp.Words

Remarque

[!REMARQUE] Pour plus d'informations sur l'affichage des boîtes de dialogue prédéfinies, voir Affichage des boîtes de dialogue prédéfinies de Word.

La méthode Add n'est pas disponible pour la collection Words. Au lieu de cela, utilisez méthode InsertAfter méthode ou méthode InsertBefore méthode pour ajouter du texte à un objet Range. L'exemple de code suivant insère le texte après le premier mot du document actif.

ActiveDocument.Range.Words(1).InsertAfter "New text "

Méthodes

Nom
Item

Propriétés

Nom
Application
Count
Creator
First
Last
Parent

Voir aussi

Référence du modèle objet Word

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.