ShapeRange.Line (Word)

Retorna um objeto LineFormat que contém as propriedades de formatação de linha para o intervalo de formas especificado. Somente leitura.

Para uma linha, o objeto LineFormat representa a própria linha; para um intervalo de formas com uma borda, o objeto LineFormat representa a borda.

Dim sre As ShapeRange: Set sre =  
Dim lftLine As LineFormat
Set lftLine = sre.Line