VBA für MS Word

Von: akademie.de Redaktion
Stand: 18. März 2008
1
(1)
Beitrag bewerten
Anmelden um Kommentare zu schreiben

Downloads zu diesem Beitrag

Das MS Word-Objektmodell

Formatvorlagen

Wie kann ich Formatvorlagen erstellen? Wie kann ich Formatvorlagen löschen? Wie kann ich Formatvorlagen ändern?

Bild vergrößernDieses Makro ändert die Schriftgröße in allen Formatvorlagen

Die Styles-Auflistung eines Dokuments enthält alle Formatvorlagen. Mit der Methode Add können Formatvorlagen erzeugt werden. Der erste Parameter gibt dabei den Namen, der zweite den Typ (wdStyleTypeParagraph für Absatzformatvorlagen bzw. wdStyleTypeCharacter für Zeichenformatvorlagen) an.

Das einzelne Style-Objekt lässt sich mit der Delete-Methode löschen, sofern es sich nicht um eine eingebaute Formatvorlage handelt. Dies kann mit Hilfe der Eigenschaft BuiltIn geprüft werden.

Häufig muss man auf die eingebauten Standardformatvorlagen verweisen. Dazu verwendet man die Styles-Auflistung und gibt in Klammern eine wdBuiltinStyle-Konstante (siehe Objektkatalog und Hilfe unter dem Stichwort Style-Eigenschaft) an.

Die wichtigsten Eigenschaften von Style-Objekten umfassen:

  • AutomaticallyUpdate: Wird die Formatvorlage automatisch aktualisiert?

  • BaseStyle: Gibt einen Verweis auf die Basis-Formatvorlage ("basierend auf:") zurück. Bei den Wurzelformatvorlagen Standard (wdStyleNormal) und Absatz-Standardschriftart (wdStyleDefaultParagraphFont) ist die Eigenschaft NameLocal dieser Basisformatvorlage ein Leer-String.

  • Font: Gibt die Zeichenformatierung als Font-Objekt zurück.

  • InUse: Wird die Formatvorlage im Dokument verwendet?

  • NameLocal: Gibt den Namen der Formatvorlage in der Landessprache an.

  • ParagraphFormat: Gibt die Absatzformatierung als ParagraphFormat-Objekt zurück.

Vorsicht: ActiveDocument.Styles(wdStyleNormal).BaseStyle.BaseStyle bringt manche Versionen von Word zum Absturz! Um zu prüfen, ob eine Formatvorlage keine Basisformatvorlage besitzt, verwenden Sie bitte den Ausdruck If styFormatvorlage.BaseStyle.NameLocal = "" Then...

Dies ist eine Leseprobe

Möchten Sie den Beitrag komplett lesen? Dann werden Sie Probemitglied und testen Sie akademie.de 14 Tage kostenlos!

Auf VBA für MS Word erfahren Sie mehr über diesen Beitrag und die weiteren Leseproben.

Weitere Informationen finden Sie auf unserer Infoseite zur Mitgliedschaft und in unseren AGB.

Ich bin bereits Mitglied
Jetzt Probemitglied werden
Ich kann in den 14 Tagen Probezeit formlos z.B. per E-Mail stornieren. Wenn ich das nicht tue, entscheide ich mich für ein