如果指定的图形在调整大小时保持其长宽比例不变，则该值为 True。如果可以分别地调整图形的长度和宽度，则该值为 False。MsoTriState 类型，可读写。
| MsoTriState 可为以下 MsoTriState 常量之一。 |
| msoCTrue |
| msoFalse 可以分别地调整图形的长度和宽度。 |
| msoTriStateMixed |
| msoTriStateToggle |
| msoTrue 指定的图形在调整大小时保持其长宽比例不变。 |
expression.LockAspectRatio
expression 必需。该表达式返回“应用于”列表中的对象之一。
本示例向 myDocument 中添加立方体。可移动该立方体及调整其大小，但不能改变其长宽比例。
Set myDocument = Worksheets(1)
myDocument.Shapes.AddShape(msoShapeCube, _
50, 50, 100, 200).LockAspectRatio = msoTrue