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


Свойство ShapeRange.LockAspectRatio (PowerPoint)

Определяет, сохраняет ли указанная фигура исходные пропорции при ее изменении. Для чтения и записи.

Синтаксис

expression. LockAspectRatio

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

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

MsoTriState

Замечания

Значение свойства LockAspectRatio может быть одной из этих констант MsoTriState .

Константа Описание
msoFalse При изменении размера фигуры можно изменять высоту и ширину фигуры независимо друг от друга.
msoTrue При изменении размера указанной фигуры сохраняются исходные пропорции.

Пример

В этом примере куб добавляется в myDocument. Куб можно перемещать и изменять размер, но не перепропоряться.

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.AddShape(msoShapeCube, 50, 50, 100, 200) _
    .LockAspectRatio = msoTrue

См. также

Объект ShapeRange

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

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