Export (0) Print
Expand All

LockAspectRatio Property [Excel 2003 VBA Language Reference]

Office 2003

MsoTriState can be one of these MsoTriState constants.
msoCTrue
msoFalse You can change the height and width of the shape independently of one another when you resize it.
msoTriStateMixed
msoTriStateToggle
msoTrue The specified shape retains its original proportions when you resize it.

expression.LockAspectRatio

expression Required. An expression that returns one of the objects in the Applies To list.

Example

This example adds a cube to myDocument. The cube can be moved and resized, but not reproportioned.

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




Show:
© 2015 Microsoft