Table of contents
TOC
Réduire la table des matières
Développer la table des matières

FindReplace.FindText, propriété (éditeur)FindReplace.FindText Property (Publisher)

office 365 dev account|Dernière mise à jour: 14/03/2018
|
3 Collaborateurs

Définit ou extrait une chaîne qui représente le texte à rechercher dans la plage spécifiée ou la sélection. En lecture-écriture.Sets or retrieves a String representing the text to find in the specified range or selection. Read/write.

SyntaxeSyntax

expression. FindTextexpression. FindText

_expression_A variable qui représente un objet FindReplace ._expression_A variable that represents a FindReplace object.

Valeur renvoyéeReturn Value

ChaîneString

RemarquesRemarks

La propriété FindText renvoie le texte brut et sans mise en forme de la sélection. Lorsque vous définissez cette propriété, le texte de recherche spécifié. Vous pouvez rechercher des caractères spéciaux en spécifiant les codes de caractère appropriés. Par exemple, « ^ p » correspond à une marque de paragraphe et « ^ t » correspond à un caractère de tabulation.The FindText property returns the plain, unformatted text of the selection. When you set this property, the search text is specified. You can search for special characters by specifying appropriate character codes. For example, "^p" corresponds to a paragraph mark and "^t" corresponds to a tab character.

La valeur par défaut de la propriété FindText est une chaîne vide. Recherche de texte seul est pris en charge, FindText doit être explicitement configurée pour éviter une erreur d’exécution.The default value for the FindText property is an empty string. Because only text searching is supported, FindText must be explicitly set to avoid a runtime error.

ExempleExample

Cet exemple remplace toutes les occurrences du mot « This » de la sélection par « That » dans chaque composition ouverte.This example replaces all occurrences of the word "This" in the selection with "That" in each open publication.

Dim objDocument As Document 

For Each objDocument In Documents 
 With objDocument.Find 
 .Clear 
 .MatchCase = True 
 .FindText = "This" 
 .ReplaceWithText = "That" 
 .ReplaceScope = pbReplaceScopeAll 
 .Forward = True 
 .Execute 
 End With 
Next objDocument 
© 2018 Microsoft