PercentWidth Property Example

This example adds a horizontal line and sets its length to 50% of the window width.

Selection.InlineShapes.AddHorizontalLineStandard
ActiveDocument.InlineShapes(1) _
    .HorizontalLineFormat.PercentWidth = 50