De:Markierte Textabschnitte entfernen

From NeoWiki

---

Revision as of 22:28, 15 February 2006

NeoOffice hat leistungsstarke Suchen-und-Ersetzen-Funktionen, aber verschiedene Abschnitte mit markiertem Text ([in Klammern gesetzter] Text z.B.) zu entfernen, ist mit den Basisfunktionen nicht möglich.

Sie können dafür das folgende Makro benutzen:

sub seekanddestroy4
dim seek
seek = thiscomponent.createReplaceDescriptor()
seek.SearchString = "\[[^\[\]]+\]"
seek.ReplaceString = ""
seek.SearchRegularExpression=True
thiscomponent.ReplaceAll(seek)
end sub

Das Makro findet alle Abschnitte mit eingeklammertem Text [wie z.B. Vorschläge für anderen Text] und ersetzt ihn mit einem leeren String [keine Zeichen].

Dieses Makro stammt von Fabrizio Venerandi (mit einer kleinen Verbesserung von Matteo Cavalleri) und wurde in den NeoOffice-Foren empfohlen.

{{botlangbarDE|English