HasBinderHeaderFooter Property
Applies To
Section object.
Description
True if the specified binder section contains a printable header or footer. Read/write Boolean.
See Also
SupportsBinderHeaderFooter 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