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


Метод Shapes.AddShape (PowerPoint)

Создает автофигуру. Возвращает объект Shape , представляющий новый автофигуру.

Синтаксис

выражение. AddShape( _Type_, _Left_, _Top_, _Width_, _Height_ )

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

Параметры

Имя Обязательный или необязательный Тип данных Описание
Тип Обязательный MsoAutoShapeType Указывает тип создаваемого автофигуры.
Left Обязательный Single Позиция левого края автофигуры относительно левого края слайда, измеряемая в точках.
Top Обязательный Single Позиция верхнего края автофигуры по отношению к верхнему краю слайда, измеряемая в точках.
Width Обязательный Single Ширина автофигуры, измеряемая в точках.
Height Обязательный Single Высота автофигуры, измеряемая в точках.

Возвращаемое значение

Shape

Примечания

Чтобы изменить тип добавленного автофигуры, задайте свойство AutoShapeType .

Пример

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

Set myDocument = ActivePresentation.Slides(1) 
myDocument.Shapes.AddShape Type:=msoShapeRectangle, _ 
    Left:=50, Top:=50, Width:=100, Height:=200

См. также

Объект Shapes

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

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