Selection.HeaderFooter (Word)
Gibt ein HeaderFooter -Objekt für die angegebene Auswahl zurück.
Wenn sich die Markierung nicht innerhalb einer Kopf- oder Fußzeile befindet, tritt ein Fehler auf.
With ActiveDocument.ActiveWindow.View
.Type = wdPrintView
.SeekView = wdSeekCurrentPageFooter
End With
Selection.HeaderFooter.PageNumbers.Add _
PageNumberAlignment:=wdAlignPageNumberCenter