Eines der größten Probleme beim Formatieren einer früheren ASCII-Datei besteht darin, sie so zu ändern, dass am Ende der Absätze nur harte Rückgaben angezeigt werden. Die meisten ASCII-Dateien haben am Ende jeder Zeile der Datei eine feste Rückgabe und am Ende jedes Absatzes zwei feste Rückgaben. Wenn Sie eine ASCII-Datei haben, die wie folgt formatiert ist, z. B. etwas, das Sie aus dem Internet heruntergeladen haben, ist das folgende Makro von unschätzbarem Wert. Es formatiert eine gesamte Datei, sodass am Ende von Absätzen nur harte Rückgaben angezeigt werden.

Sub ConvertASCII()

Fmt "^p^p", "{|}"

Fmt "^p", " {@}"

Fmt " {@}", " "

Fmt "{@}", " "

Fmt "{|}", "^p"

End Sub
Sub Fmt(sFromWord, sToWord)

Set myRange = ActiveDocument.Content     myRange.Find.ClearFormatting     myRange.Find.Execute FindText:=sFromWord, _       ReplaceWith:=sToWord, MatchCase:=0, _       Replace:=wdReplaceAll End Sub

Sie sollten das ConvertASCII-Makro ausführen. Das Fmt-Makro wird mehrmals aufgerufen, um verschiedene Kombinationen von Rückgabezeichen zu ersetzen und das gewünschte Ergebnis zu erzielen.

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (187) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Automatische Formatierung einer ASCII-Datei.