Alle "Bereiche" auf einmal aufheben

[Delabarquera]

Hallo!

Ich habe zum ersten Mal mit der neuen Funktion bei Wikipedia ein ganzen Buch zusammengestellt. Ca. 300 Seiten, die sich direkt im OO-Format downloaden lassen. Nun ist dieses Buch voller "Bereiche", die ich herausnehmen möchte. Das kann man händisch tun und -- grob geschätzt -- ca. 820 mal klicken. Frage: Geht das auch anders, schneller, auf einen Schlag?

Grüße! D.

Nachtrag: Ich könnte natürlich als reiner Text speichern und wieder aufrufen. Dann wäre aber natürlich jede Formatierung weg, auch die, die ich behalten möchte. (Überschriften usw.)

[komma4]

Versuch es mal mit folgendem Makro

Code: Alles auswählen

Sub de39181
' 2010-06-09
oDokument= ThisComponent

oDokBereiche = oDokument.TextSections
For i = 0 to oDokBereiche.Count - 1
   oDokBereiche( i ).dispose()
Next i
End Sub

Am Besten natürlich an einer Kopie - übernehme keine Garantie, aber hier (OOo 300m9, Linux) funktioniert das