ShapeRange.LockAspectRatio Property (PowerPoint)
Determines whether the specified shape retains its original proportions when you resize it. Read/write.
Syntax
expression .LockAspectRatio
expression A variable that represents a ShapeRange object.
Return Value
MsoTriState
Remarks
The value of the LockAspectRatio property can be one of these MsoTriState constants.
Constant |
Description |
---|---|
msoFalse |
You can change the height and width of the shape independently of one another when you resize it. |
msoTrue |
The specified shape retains its original proportions when you resize it. |
Example
This example adds a cube to myDocument. The cube can be moved and resized, but not reproportioned.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape(msoShapeCube, 50, 50, 100, 200) _
.LockAspectRatio = msoTrue