Свойство ShapeRange.AutoShapeType (PowerPoint)
Возвращает или задает тип фигуры для указанного объекта ShapeRange , который должен представлять автофигуру, отличный от линии, рисунка свободной формы или соединителя. Для чтения и записи.
Синтаксис
expression. AutoShapeType
Выражение Переменная, представляющая объект ShapeRange .
Возвращаемое значение
Замечания
Используйте свойство Type объекта ConnectorFormat , чтобы задать или вернуть тип соединителя.
Пример
В этом примере все 16-точечная звезда заменена 32-точечной звездой в myDocument.
Set myDocument = ActivePresentation.Slides(1)
For Each s In myDocument.Shapes
If s.AutoShapeType = msoShape16pointStar Then
s.AutoShapeType = msoShape32pointStar
End If
Next
Примечание.
При изменении типа фигуры она сохраняет свой размер, цвет и другие атрибуты.
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.