OutsideLineWidth Property Example

This example adds a wavy border around the first table in the active document.

If ActiveDocument.Tables.Count >= 1 Then
    With ActiveDocument.Tables(1).Borders
        .OutsideLineStyle = wdLineStyleSingleWavy
        .OutsideLineWidth = wdLineWidth075pt
    End With
End If

This example adds dotted borders around the first four paragraphs in the active document.

Set myDoc = ActiveDocument
Set myRange = myDoc.Range(Start:=myDoc.Paragraphs(1).Range.Start, _
    End:=myDoc.Paragraphs(4).Range.End)
myRange.Borders.OutsideLineStyle = wdLineStyleDot
myRange.Borders.OutsideLineWidth = wdLineWidth075pt