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


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

Значение true , если указанная фигура сохраняет исходные пропорции при изменении размера фигуры. Значение False , если при изменении размера фигуры можно изменять высоту и ширину фигуры независимо друг от друга. Чтение и запись MsoTriState.

Синтаксис

expression. LockAspectRatio

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

Пример

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

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

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

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