Propriedade Adjustments.Item (Publisher)
Retorna ou define um Variant indicando o valor de ajuste especificado pelo argumento Index. Leitura/gravação.
Sintaxe
expressão. Item (Índice)
Expressão Uma variável que representa um objeto Adjustments .
Parâmetros
Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
---|---|---|---|
Índice | Obrigatório | Integer | O número de índice do ajuste. |
Comentários
AutoFormas, conectores e objetos WordArt podem ter até oito ajustes.
Para ajustes lineares, um valor de ajuste de 0.0 corresponde, geralmente, à borda esquerda ou superior da forma, e um valor de 1.0 geralmente corresponde à borda direita ou inferior da forma. No entanto, os ajustes podem ultrapassar os limites da forma para algumas formas.
Para ajustes radiais, um valor de ajuste de 1.0 corresponde à largura da forma.
Para ajustes angulares, o valor de ajuste é especificado em graus.
A propriedade Item se aplica somente a formas que têm ajustes.
Exemplo
Este exemplo adiciona duas cruzes à publicação ativa e define o valor para o ajuste um (o único para esse tipo de AutoShape) em cada cruz.
With ActiveDocument.Pages(1).Shapes
.AddShape(Type:=msoShapeCross, Left:=10, Top:=10, Width:=100, _
Height:=100).Adjustments.Item(1) = 0.4
.AddShape(Type:=msoShapeCross, Left:=150, Top:=10, Width:=100, _
Height:=100).Adjustments.Item(1) = 0.2
End With
Este exemplo tem o mesmo resultado que o exemplo anterior, embora não use explicitamente a propriedade Item.
With ActiveDocument.Pages(1).Shapes
.AddShape(Type:=msoShapeCross, Left:=10, Top:=10, Width:=100, _
Height:=100).Adjustments(1) = 0.4
.AddShape(Type:=msoShapeCross, Left:=150, Top:=10, Width:=100, _
Height:=100).Adjustments(1) = 0.2
End With
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.