Propriedade Adjustments.Item (Word)
Retorna ou define o valor de ajuste especificado pelo argumento Index . Somente leitura/gravação.
Sintaxe
expressão. Item (Índice)
Expressão Uma expressão que retorna um objeto 'Ajustes'.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| Índice | Obrigatório | Long | O número de índice do ajuste. |
Comentários
Para ajustes lineares, um valor de ajuste de 0,0 geralmente corresponde à 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. AutoFormas e WordArt ter até oito ajustes.
Exemplo
Este exemplo adiciona duas cruzes ao documento ativo e define o valor para o ajuste um (o único nesse tipo de AutoForma) em cada cruz.
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes
.AddShape(msoShapeCross, _
10, 10, 100, 100).Adjustments.Item(1) = 0.4
.AddShape(msoShapeCross, _
150, 10, 100, 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.
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes
.AddShape(msoShapeCross, _
10, 10, 100, 100).Adjustments(1) = 0.4
.AddShape(msoShapeCross, _
150, 10, 100, 100).Adjustments(1) = 0.2
End With
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.