Lire en anglais

Partager via


Find object (Word)

Représente les critères d'une opération de recherche.

Remarques

Les propriétés et les méthodes de l’objet Find correspondent aux options répertoriées dans la boîte de dialogue Rechercher et remplacer.

Utilisez la propriété Find pour renvoyer un objet Find. L’exemple suivant montre comment rechercher et sélectionner l’occurrence suivante du mot « hi ».

With Selection.Find 
 .ClearFormatting 
 .Text = "hi" 
 .Execute Forward:=True 
End With

L'exemple suivant montre comment rechercher toutes les occurrences du mot « hi » dans le document actif et les remplacer par « hello ».

Set myRange = ActiveDocument.Content 
myRange.Find.Execute FindText:="hi", ReplaceWith:="hello", _ 
 Replace:=wdReplaceAll

Si vous avez obtenu l’objet Find à partir de l’objet Selection, la sélection est modifiée lorsque le texte correspondant aux critères de recherche est localisé. L’exemple suivant montre comment sélectionner l’occurrence suivante du mot « blue ».

Selection.Find.Execute FindText:="blue", Forward:=True

Si vous avez obtenu l’objet Find à partir de l’objet Range, la sélection n’est pas modifiée lorsque le texte correspondant aux critères de recherche est localisé, mais l’objet Range est redéfini. L’exemple suivant montre comment localiser la première occurrence du mot « blue » dans le document actif. Si ce mot est trouvé dans le document, myRange est redéfini et la mise en forme gras est appliquée au mot « blue ».

Set myRange = ActiveDocument.Content 
myRange.Find.Execute FindText:="blue", Forward:=True 
If myRange.Find.Found = True Then myRange.Bold = True

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.