InsideLineWidth Property
From Microsoft Word Visual Basic
InsideLineWidth Property
Returns or sets the line width of the inside border of an object. Returns wdUndefined if the object has inside borders with more than one line width; otherwise, returns False or a WdLineWidth constant. Can be set to True, False, or one of the following WdLineWidth constants.
| WdLineWidth can be one of these WdLineWidth constants. |
| wdLineWidth025pt |
| wdLineWidth050pt |
| wdLineWidth075pt |
| wdLineWidth100pt |
| wdLineWidth150pt |
| wdLineWidth225pt |
| wdLineWidth300pt |
| wdLineWidth450pt |
| wdLineWidth600pt |
expression.InsideLineWidth
expression Required. An expression that returns a Border object.
Example
This example adds borders between rows and between columns in the first table in the active document.
Dim tableTemp As Table
If ActiveDocument.Tables.Count >= 1 Then
Set tableTemp = ActiveDocument.Tables(1)
tableTemp.Borders.InsideLineStyle = wdLineStyleDot
tableTemp.Borders.InsideLineWidth = wdLineWidth050pt
End If
This example adds dotted borders between the first four paragraphs of the active document.
Dim docActive As Document Dim rngTemp As Range Set docActive = ActiveDocument Set rngTemp=docActive.Range( _ Start:=docActive.Paragraphs(1).Range.Start, _ End:=docActive.Paragraphs(4).Range.End) rngTemp.Borders.InsideLineStyle = wdLineStyleDot rngTemp.Borders.InsideLineWidth = wdLineWidth075pt