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.
expresión. LockAspectRatio
Expresión Variable que representa un objeto ShapeRange .
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
¿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.