Propriedade ShapeRange.LockAspectRatio (PowerPoint)
Determina que a forma especificada mantenha as suas proporções originais ao ser redimensionada. Leitura/gravação.
Sintaxe
expressão. LockAspectRatio
Expressão Uma variável que representa um objeto ShapeRange .
Valor de retorno
MsoTriState
Comentários
O valor da propriedade LockAspectRatio pode ser uma destas constantes MsoTriState.
| Constante | Descrição |
|---|---|
| msoFalse | Você pode alterar a altura e a largura da forma, independente uma da outra, ao redimensioná-la. |
| msoTrue | A forma especificada mantém as suas proporções originais ao ser redimensionada. |
Exemplo
Este exemplo adiciona um cubo a myDocument. O cubo pode ser movido e redimensionado, mas não na mesma proporção.
Set myDocument = ActivePresentation.Slides(1)
myDocument.Shapes.AddShape(msoShapeCube, 50, 50, 100, 200) _
.LockAspectRatio = msoTrue
Confira também
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.