Alle "Bereiche" auf einmal aufheben

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Alle "Bereiche" auf einmal aufheben

Re: Alle "Bereiche" auf einmal aufheben

von komma4 » Di, 08.06.2010 23:12

Versuch es mal mit folgendem Makro 8)


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

Alle "Bereiche" auf einmal aufheben

von Delabarquera » Di, 08.06.2010 21:58

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.)

Nach oben