Méthode Application.CleanString (Word)
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). Renvoie le résultat sous forme de chaîne.
Syntaxe
expression. CleanString( _String_ )
expression Variable qui représente un objet « Application ». 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
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.