Objeto Lines (Word)
Uma coleção de objetos Line que representa as linhas em um objeto Rectangle do tipo wdTextRectangle.
Use a propriedade Lines para retornar uma coleção de linhas para o retângulo especificado. O exemplo a seguir acessa as linhas do primeiro retângulo na primeira página do documento ativo.
Dim objLines As Lines
Set objLines = ActiveDocument.ActiveWindow.Panes(1) _
.Pages(1).Rectangles(1).Lines
Use a propriedade RectangleType do objeto Rectangle especificado para determinar se o objeto Rectangle é do tipo wdTextRectangle. O exemplo a seguir retorna a coleção de linhas do primeiro retângulo na primeira página do documento ativo se o retângulo especificado contiver texto.
Dim objRectangle As Rectangle
Dim objLines As Lines
Set objRectangle = ActiveDocument.ActiveWindow _
.Panes(1).Pages(1).Rectangles(1)
If objRectangle.RectangleType = wdTextRectangle Then _
Set objLines = objRectangle.Lines
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.