Propiedad ShapeRange.LockAspectRatio (Excel)

Es True si la forma especificada mantiene sus proporciones originales al ajustar su tamaño. Es False si el alto y el ancho de la forma se pueden cambiar independientemente al ajustar su tamaño. MsoTriState de lectura y escritura.

Sintaxis

expresión. LockAspectRatio

Expresión Variable que representa un objeto ShapeRange .

Ejemplo:

En este ejemplo, se agrega un cubo a myDocument. El cubo se puede mover y se puede cambiar su tamaño pero no se puede redimensionar.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.