Méthode Global.CleanString (Word)

  • Article

Supprime les caractères non imprimables (codes de caractères 1 à 29) et les caractères Word spéciaux de la chaîne spécifiée ou les remplace par des espaces (code caractère 32), comme décrit dans la section « Remarques ». Renvoie le résultat sous forme de chaîne.

Syntaxe

expression. CleanString( _String_ )

Expression Variable qui représente un objet « Global ». Facultatif.

Paramètres

Nom Requis/Facultatif Type de données Description
String Obligatoire Chaîne Chaîne source.

Remarques

Les caractères suivants sont convertis comme indiqué dans ce tableau.

Code de caractère Description
7 (bip) Supprimé sauf s'il est précédé du caractère 13 (paragraphe), puis converti en caractère 9 (tabulation).
10 (retour à la ligne) Converti en caractère 13 (paragraphe), sauf s'il est précédé du caractère 13, puis supprimé.
13 (paragraphe) Inchangé.
31 (trait d'union conditionnel) Supprimé.
160 (espace insécable) Converti en caractère 32 (espace).
172 (trait d'union conditionnel) Supprimé.
176 (espace insécable) Converti en caractère 32 (espace).
182 (marque de paragraphe) Supprimé.
183 (puce) Converti en caractère 32 (espace).

Exemple

Cet exemple montre comment supprimer les caractères non imprimables du texte sélectionné, puis insérer le résultat dans un nouveau document.

Dim strClean As String 
Dim docNew As Document 
 
strClean = Application.CleanString(Selection.Text) 
Set docNew = Documents.Add 
docNew.Content.InsertAfter strClean

Cet exemple montre comment supprimer les caractères non imprimables du code de champ sélectionné, puis afficher le résultat.

ActiveDocument.ActiveWindow.View.ShowFieldCodes = True 
ActiveDocument.Fields(1).Select 
MsgBox Application.CleanString(Selection.Text)

Voir aussi

Objet global

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.