Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Devolve ou define uma constante MsoTriState que indica se a forma especificada mantém as proporções originais quando a redimensiona. Leitura/gravação.
Sintaxe
expressão. LockAspectRatio
expressão Uma variável que representa um objeto Shape.
Comentários
O valor da propriedade LockAspectRatio pode ser uma das constantes MsoTriState declaradas na biblioteca de tipos do Microsoft Office e mostradas na tabela a seguir.
| Constante | Descrição |
|---|---|
| msoFalse | A altura e a largura da forma mudam independentemente uma da outra quando você a redimensiona. |
| msoTriStateMixed | Um valor devolvido que indica uma combinação de msoTrue e msoFalse para o intervalo de formas especificado. |
| msoTriStateToggle | Um valor definido que alterna entre msoTrue e msoFalse. |
| msoTrue | A forma especificada mantém as suas proporções originais ao ser redimensionada. |
Exemplo
Este exemplo adiciona um cubo à publicação ativa. O cubo pode ser movido e redimensionado, mas não ter suas proporções alteradas.
Dim shp As Shape
Set shp = ActiveDocument.Pages(1).Shapes _
.AddShape(Type:=msoShapeCube, _
Left:=50, Top:=50, Width:=100, Height:=200) _
shp.LockAspectRatio = msoTrue
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.