Поделиться через

Объект ShapeRange (Word)

  • Статья

Представляет диапазон фигур, представляющий собой набор фигур в документе. Диапазон фигур может содержать всего одну фигуру или все фигуры в документе.

Замечания

Для создания диапазона фигур можно указать любые фигуры, выбранные из всех фигур в документе или всех фигур в выделенном фрагменте. Например, можно создать коллекцию ShapeRange , содержащую первые три фигуры в документе, все выбранные фигуры в документе или все фигуры свободной формы в документе. Большинство операций, которые можно выполнить с объектом Shape , можно также выполнить с объектом ShapeRange , который содержит только одну фигуру. Некоторые операции, выполняемые с объектом ShapeRange , содержащим несколько фигур, приводят к ошибке.

Используйте диапазон (индекс), где индекс — это имя или номер индекса фигуры или массива, содержащего имена или номера индексов фигур, чтобы вернуть коллекцию ShapeRange , представляющую набор фигур в документе. Используйте функцию Array в Visual Basic для создания массива имен или номеров индексов. В следующем примере задается шаблон заливки для фигур один и три в активном документе.

ActiveDocument.Shapes.Range(Array(1, 3)).Fill.Patterned _ 
 msoPatternHorizontalBrick

В следующем примере в активном документе выбираются фигуры с именами Oval 4 и Rectangle 5.

ActiveDocument.Shapes.Range(Array("Oval 4", "Rectangle 5")).Select

Хотя метод Range можно использовать для возврата любого количества фигур, проще использовать метод Item , если требуется вернуть только один член коллекции. Например, проще, Shapes(1) чем Shapes.Range(1).

Используйте ShapeRange (индекс), где индекс — это имя или номер индекса, чтобы вернуть объект Shape , представляющий фигуру в выделенном фрагменте. В следующем примере задается заливка для первой фигуры в выделенном фрагменте, при условии, что выделенная фигура содержит по крайней мере одну фигуру.

Selection.ShapeRange(1).Fill.ForeColor.RGB = RGB(255, 0, 0)

В этом примере выбираются все фигуры в первом разделе активного документа.

Set myRange = ActiveDocument.Sections(1).Range 
myRange.ShapeRange.Select

Используйте метод Выравнивание, Распределение или ZOrder , чтобы разместить набор фигур относительно друг друга или относительно документа.

Используйте метод Group, Regroup или UnGroup для создания и работы с одной фигурой, сформированной из диапазона фигур. Свойство GroupItems для объекта Shape возвращает объект GroupShapes , который представляет все фигуры, сгруппированные в одну фигуру.

При записи фигур средство записи всегда использует свойство ShapeRange .

Примечание.

Объект ShapeRange не включает объекты InlineShape .

Методы

Свойства

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.