Winword 2.0
Tip: Nach dem Einscannen eines Schriftstücks oder dem Importieren von DOS-Texten enthalten die so
erzeugten Dokumente häufig störende Returns an jedem Zeilenende.
Da eine einzeln auftauchende Absatzmarke in diesen Fällen lediglich die Zeilen beendet, befinden sich an
jedem Absatzende immer zwei Returns hintereinander.
Um die überflüssigen Absatzmarken nicht mühsam per Hand löschen zu müssen, lohnt es sich, ein Makro
aufzuzeichnen, das die „echten“ Absatzmarken durch eine Zeichenfolge ersetzt, dann alle Returns löscht,
um anschließend die Zeichenfolge wieder durch eine Absatzmarke zu ersetzen.
Bevor Sie die Aufzeichnung starten, sollten Sie darauf achten, daß Sie kein wichtiges Dokument geöffnet
haben. Bei einem normalen Dokument, in dem die Absätze
durch einzelne Returns gesetzt wurden, gingen sonst die Absatzschaltungen verloren. Verwenden Sie also
ein Dokument mit Returns am Ende jeder Zeile und doppelter Absatzschaltung oder legen Sie testweise ein
neues Dokument an. Starten Sie dann die Aufzeichnung mit »Extras | Makros | Aufzeichnen« und wählen Sie
aus dem Menü »Bearbeiten« den Punkt »Ersetzen«.
Betätigen Sie jetzt die Schaltfläche »Sonstiges« am unteren Rand der Dialogbox und wählen Sie den Eintrag
»Absatzmarke« ganz oben in der Liste aus. Wiederholen Sie den Vorgang, und im Feld »Suchen nach:«
müßte nun die Zeichenfolge »^a^a« stehen. Schreiben Sie in die Zeile »Ersetzen durch:« eine Zeichenfolge,
die sicher in keinem Dokument vorkommt, also zum Beispiel »@##@«, und klicken Sie anschließend auf »Alle
ersetzen«. Schließen Sie die Meldungsbox über die Anzahl der Fundstellen mit »OK« und löschen Sie eine
der beiden Zeichenfolgen für Absatzmarken im Feld »Suchen nach:«. Der Inhalt diese Feldes lautet jetzt »^a«.
Das Feld »Ersetzen durch« muß leer sein, also löschen Sie die zuvor festgelegte Zeichenfolge und betätigen
dann nochmals »Alle ersetzen«. Nachdem Sie auch die folgende Meldungsbox mit »OK« geschlossen haben,
tragen Sie in »Suchen nach:« die zuvor festgelegte Zeichenfolge (in dem Beispiel »@##@«)ein. Unter
»Ersetzen durch:« tragen Sie über »Sonstiges« jetzt nur noch eine Absatzendemarke ein. Nach einem Klick
auf »Alle ersetzen«, dem Schließen des Mitteilungsfensters mit »OK« und der Dialogbox »Ersetzen« durch
»Schließen« können Sie die Makroaufzeichnung mit einem Klick auf die Schaltfläche mit dem Quadrat
beenden. Um alle überflüssigen Absatzendemarken durch das Makro löschen zu lassen, starten Sie Ihr
Makro einfach mit »Extras | Makro | Ausführen«.