Global.CleanString-Methode (Word)

Entfernt nicht druckbare Zeichen (Zeichencodes 1–29) und Word-Sonderzeichen aus der angegebenen Zeichenfolge oder ändert sie in Leerzeichen (Zeichencode 32), wie im Abschnitt "Hinweise" beschrieben. Gibt das Ergebnis als String zurück.

Syntax

Ausdruck. CleanString( _String_ )

Ausdruck Eine Variable, die ein Global-Objekt darstellt. Optional.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
String Erforderlich String Die Quellzeichenfolge.

HinwBemerkungeneise

Die folgenden Zeichen werden entsprechend der Beschreibung in der Tabelle umgewandelt.

Zeichencode Beschreibung
7 (Warnton) Wird, sofern nicht das Zeichen 13 (Absatz) voransteht, entfernt und anschließend in Zeichen 9 (Tabulator) umgewandelt.
10 (Zeilenvorschub) Wird, sofern nicht das Zeichen 13 voransteht, in Zeichen 13 (Absatz) umgewandelt und anschließend entfernt.
13 (Absatz) Unverändert.
31 (bedingter Trennstrich) Entfernt.
160 (geschütztes Leerzeichen) In Zeichen 32 (Leerzeichen) konvertiert.
172 (bedingter Trennstrich) Entfernt.
176 (geschütztes Leerzeichen) In Zeichen 32 (Leerzeichen) konvertiert.
182 (Absatzmarke) Entfernt.
183 (Aufzählungszeichen) In Zeichen 32 (Leerzeichen) konvertiert.

Beispiel

In diesem Beispiel werden nicht druckbare Zeichen aus dem markierten Text entfernt, und das Ergebnis wird in ein neues Dokument eingefügt.

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

In diesem Beispiel werden nicht druckbare Zeichen aus der markierten Feldfunktion entfernt, und das Ergebnis wird angezeigt.

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

Siehe auch

Globales Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.