Find object (Word)
Représente les critères d'une opération de recherche.
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
Référence du modèle objet Word
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.