Propiedad Adjustments.Item (Word)
Devuelve o establece el valor de ajuste especificado por el argumento Index . Single de lectura y escritura.
Sintaxis
expresión. Elemento (índice)
Expresión Expresión que devuelve un objeto 'Adjustments'.
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Index | Obligatorio | Long | Número de índice del ajuste. |
Comentarios
Para ajustes lineales, un valor de ajuste de 0,0 corresponde generalmente al borde izquierdo o superior de la forma y un valor de 1.0 corresponde generalmente al borde derecho o inferior de la forma. Sin embargo, los ajustes pueden sobrepasar los límites de la forma para algunas formas. Para ajustes radiales, un valor de ajuste de 1.0 corresponde al ancho de la forma. Para ajustes angulares, el valor de ajuste se especifica en grados. La propiedad Item se aplica únicamente a las formas que tienen ajustes. Las autoformas y WordArt tienen hasta ocho ajustes.
Ejemplo:
En este ejemplo, se agregan dos cruces al documento activo y, a continuación, se establece el valor del ajuste uno (el único para este tipo de autoforma) en 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 ejemplo tiene el mismo resultado que el ejemplo anterior, aunque no utiliza explícitamente la propiedad 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
Consulte también
Soporte técnico y comentarios
¿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.