Объект Rectangle (Word)
Представляет часть текста или рисунок на странице. Используйте объект Rectangle и связанные методы и свойства для программного определения макета страницы в документе.
Используйте метод Item для возврата определенного объекта Rectangle . В следующем примере показано обращение к первому прямоугольнику на первой странице активного документа.
Dim objRectangle As Rectangle
Set objRectangle = ActiveDocument.ActiveWindow _
.Panes(1).Pages(1).Rectangles.Item(1)
Используйте свойство RectangleType для определения типа прямоугольника. В следующем примере создается объект ShapeRange, если указанный прямоугольник является фигурой.
Dim objRectangle As Rectangle
Dim objShape As ShapeRange
Set objRectangle = ActiveDocument.ActiveWindow _
.Panes(1).Pages(1).Rectangles.Item(1)
If objRectangle.RectangleType = wdShapeRectangle Then
Set objShape = objRectangle.Range.ShapeRange
End If
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.