InsideLineWidth Property Example

This example adds borders between rows and between columns in the first table in the active document.

If ActiveDocument.Tables.Count >= 1 Then
    Set myTable = ActiveDocument.Tables(1)
    myTable.Borders.InsideLineStyle = wdLineStyleDot
    myTable.Borders.InsideLineWidth = wdLineWidth050pt
End If

This example adds dotted borders between 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.InsideLineStyle = wdLineStyleDot
myRange.Borders.InsideLineWidth = wdLineWidth075pt