ArtWidth Property Example

This example adds a 6-point dotted border around each page in the first section in the selection.

For Each aBorder In Selection.Sections(1).Borders
    aBorder.ArtStyle = wdArtBasicBlackDots
    aBorder.ArtWidth = 6
Next aBorder