[de-users] Writer: Makro zum Aus-/Einblenden von Inhalten mit spezifischen Absatzvorlagen

Moin.

Vor längerer Zeit erhielt ich hier in der Liste mal ein Makro zum Aus-
und Einblenden von Inhalten mit einer spezifischen Absatzvorlage.

Beispiel:
Sub fragen
absatz =_
thiscomponent.StyleFamilies.getByName("ParagraphStyles").getbyName("fragen")
absatz.CharHidden  = not absatz.CharHidden
End Sub

Funktioniert prima.

Nun möchte ich nicht nur eine Absatzvorlage, sondern mehrere
ausblenden.

Folgendes funktioniert nicht:

Sub fragen-notiert
absatz =_
thiscomponent.StyleFamilies.getByName("ParagraphStyles").getbyName("fragen")
absatz =_
thiscomponent.StyleFamilies.getByName("ParagraphStyles").getbyName("notiert")
absatz.CharHidden  = not absatz.CharHidden
End Sub

Dabei wird nur "fragen" ausgeblendet nicht aber "notiert".

Schüttelt jemand den richtigen Code aus dem Ärmel?
Ich würde mich freuen. Danke.


Andreas
-- 
http://borumat.de/libreoffice-writer-tipps


-- 
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert