Свойство Document.Shapes (Word)

Статья
04/07/2023

Возвращает коллекцию Shapes , представляющую все объекты Shape в указанном документе. Только для чтения.

Синтаксис

expression. Формы

Выражение Переменная, представляющая объект Document .

Замечания

Эта коллекция может содержать рисунки, фигуры, рисунки, объекты OLE, элементы ActiveX, текстовые объекты и выноски. Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.

Свойство Shapes при применении к документу возвращает все объекты Shape в основной истории документа, за исключением колонтитулов.

Пример

В этом примере создается новый документ, к нему добавляется прямоугольник шириной 100 точек и высотой 50 точек, а верхний левый угол прямоугольника — в 5 точках от левого края и 25 точек от левого верхнего угла страницы.

Set myDoc = Documents.Add 
myDoc.Shapes.AddShape msoShapeRectangle, 5, 25, 100, 50

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

For Each s in ActiveDocument.Shapes 
 s.Fill.PresetTextured msoTextureOak 
Next s

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

Set myShape = ActiveDocument.Shapes(1) 
myShape.Shadow.Type = msoShadow6

См. также

Объект Document

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

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

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