SurroundFooter Property

expression.SurroundFooter

expression    Required. An expression that returns a Borders collection object.

Example

This example formats the page border in section one of the active document so that it encompasses the header and footer on each page in the section.

With ActiveDocument.Sections(1).Borders
    .SurroundFooter = True
    .SurroundHeader = True
End With
		

This example adds a graphical page border around each page in section one. The page border doesn't encompass the header and footer areas.

With ActiveDocument.Sections(1)
    .Borders.SurroundFooter = False
    .Borders.SurroundHeader = False
    For Each aBord In .Borders
        aBord.ArtStyle = wdArtPeople
        aBord.ArtWidth = 15
    Next aBord
End With