Button für Formatvorlage Überschrift 1, 2, 3

Computer: Software & Programmierung Visual Basic
#1

Hallo,

ich möchte gerne über drei Button die Überschriften 1, 2 und 3 per VBA ansteuern und eine bestimmte Formatierung sofort hinterlegen, bei welcher vor der jeweiligen Überschrift Nummern stehen.
Hierbei stoße ich auf Probleme. Könnte mir jemand folgenden Code korrigieren oder einen Hinweis geben?

Es ist leider so, dass ich dies für Überschrift 1 noch hinbekomme, aber Überschrift 2 und 3 spinnen.

Danke im Voraus,
Ali Drin

With .ListTemplate.ListLevels(1)
.NumberFormat = "%1. "
.NumberStyle = wdListNumberStyleArabic
.NumberPosition = AppWord.CentimetersToPoints(0)
.Alignment = wdListLevelAlignLeft
.TabPosition = AppWord.CentimetersToPoints(3)
.TextPosition = AppWord.CentimetersToPoints(3)
.ResetOnHigher = 0
.StartAt = 1
End With

#2

ich möchte gerne über drei Button die Überschriften 1, 2 und 3
per VBA ansteuern und eine bestimmte Formatierung sofort
hinterlegen, bei welcher vor der jeweiligen Überschrift
Nummern stehen.
Hierbei stoße ich auf Probleme. Könnte mir jemand folgenden
Code korrigieren oder einen Hinweis geben?

Es ist leider so, dass ich dies für Überschrift 1 noch
hinbekomme, aber Überschrift 2 und 3 spinnen.

Hallo Ali,

welche Wordversion?

Zeige mal eine komplette Sub.

Ggfs. Beispieldokument hochladen mit File-upload, s.FAQ:2606

Gruß
Reinhard

#3

Hi Reinhard

Danke für die Rückfrage, habe es mittlerweile geschafft!

Ali

1 Like