LineFormat.InsetPen Property (Word)
MsoTrue to draw lines inside a specified shape. Read/write MsoTriState.
Syntax
expression .InsetPen
expression Required. A variable that represents a LineFormat object.
Remarks
Use the InsetPen property to match up the edges of shapes of equal width but whose line widths vary.
Example
This example sets all shapes in the active document to draw lines inside the shapes.
Sub InsetLine()
Dim shpShape As Shape
For Each shpShape In ActiveDocument.Shapes
shpShape.Line.InsetPen = msoTrue
Next shpShape
End Sub