AddHorizontalLine Method Example
This example adds a horizontal line above the current selection in the active document using a file called "ArtsyRule.gif."
Selection.InlineShapes.AddHorizontalLine _ "C:\My Documents\ArtsyRule.gif"