Объект Lines (Word)
Коллекция объектов Line , представляющая строки в объекте Rectangle типа wdTextRectangle.
Используйте свойство Lines , чтобы вернуть коллекцию строк для указанного прямоугольника. В следующем примере показано обращение к строкам в первом прямоугольнике первой страницы активного документа.
Dim objLines As Lines
Set objLines = ActiveDocument.ActiveWindow.Panes(1) _
.Pages(1).Rectangles(1).Lines
Используйте свойство RectangleType указанного объекта Rectangle , чтобы определить, имеет ли объект Rectangle тип wdTextRectangle. В следующем примере возвращается коллекция строк в первом прямоугольнике на первой странице активного документа, если указанный прямоугольник содержит текст.
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
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.