Shape.Line (Word)

Retorna um objeto LineFormat que contém as propriedades de formatação de linha para a forma especificada. Somente leitura.

Para uma linha, o objeto LineFormat representa a própria linha; para uma forma com uma borda, o objeto LineFormat representa a borda.

Set myDocument = ActiveDocument 
With myDocument.Shapes.AddLine(10, 10, 250, 250).Line 
 .DashStyle = msoLineDashDotDot 
 .ForeColor.RGB = RGB(50, 0, 128) 
End With