Share via


ApplyPageBordersToAllSections Method

Applies the specified page-border formatting to all sections in a document.

expression**.ApplyPageBordersToAllSections**

expression Required. An expression that returns a Borders object.

Example

This example adds a single-line page border to all sections in the active document.

Dim borderLoop As Border

With ActiveDocument.Sections(1)
    For Each borderLoop In .Borders
        With borderLoop
            .LineStyle = wdLineStyleSingle
            .LineWidth = wdLineWidth050pt
        End With
    Next borderLoop
    .Borders.ApplyPageBordersToAllSections
End With

Applies to | Borders Collection Object

See Also | EnableFirstPageInSection Property | EnableOtherPagesInSection Property