This example removes all borders from the first cell in table one.
If ActiveDocument.Tables.Count >= 1 Then
ActiveDocument.Tables(1).Cell(1, 1).Borders.Enable = False
End If
This example applies a dashed border around the first paragraph in the selection.
Options.DefaultBorderLineWidth = wdLineWidth025pt
Selection.Paragraphs(1).Borders.Enable = wdLineStyleDashSmallGap
This example applies a border around the first character in the selection. If nothing is selected, the border is applied to the first character after the insertion point.
Selection.Characters(1).Borders.Enable = True