Wort VBA über Access

[tommytulpe]

Hallo allerseits:

Ich erstelle in Access ein Word-Dokument.
Darin wird in der Fußzeile die Seite nummeriert:

  With ActiveDocument.Sections(1) _
        .Footers(wdHeaderFooterPrimary).PageNumbers
        .NumberStyle = wdPageNumberStyleArabic
        .IncludeChapterNumber = False
        .RestartNumberingAtSection = True
        .StartingNumber = 0
        .Add PageNumberAlignment:=wdAlignPageNumberCenter, FirstPage:=False
   End With

Ich benötige aber das Format: Seite 3 von 5 ......oder so ähnlich also Gesamtseiten sollten mit drauf.

In Word ist das ja klar, aber über VBA, sorry nichts gefunden.

Danke für Eure Unterstützung.
Thomas

[Knobbi38]

Hallo Thomas,

warum fügst du nicht einfach die Felder "PAGE" und "NUMPAGES" der Fußzeile hinzu?
Alternativ könntest du natürlich auch den passenden Schnellbaustein der Fußzeile hinzufügen.

Einen ersten Hinweis auf den passenden Code kannst du mit dem Makrorekorder in Word aufzeichnen.

Gruß Ulrich