CenterFooter Property
Applies To
PageSetup object.
Description
Returns or sets the center part of the footer in sections that support headers or footers (or both) and that are included in the binder at the time the footer is set. Read/write String.
Remarks
You can use special format codes in the footer text.
See Also
HasBinderHeaderFooter property, LeftFooter property, RightFooter property.
Example
This example prints the page number — in bold, italic type — in the center of every page in each section of Binder1.obd that supports headers or footers (or both).
Set myBinder = GetObject("C:\Binder1.obd", "OfficeBinder.Binder")
With myBinder
For Each s In .Sections
If s.SupportsBinderHeaderFooter Then
.PageSetup.CenterFooter = "&B &I &P &B"
s.HasBinderHeaderFooter = True
End If
Next
.Close SaveChanges:=True
End With