|
De:Markierte Textabschnitte entfernen
From NeoWiki
NeoOffice hat leistungsstarke Suchen-und-Ersetzen-Funktionen, aber verschiedene Abschnitte mit markiertem (z.B. [in Klammern gesetztem]) Text 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