Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Devuelve o establece un valor Variant que indica el valor de ajuste especificado por el argumento Index. Lectura y escritura.
Sintaxis
expresión. Elemento (índice)
expresión Variable que representa un objeto Adjustments .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Index | Obligatorio | Integer | Número de índice del ajuste. |
Observaciones
Las autoformas, conectores y objetos de WordArt pueden tener hasta ocho ajustes.
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, al borde derecho o inferior. 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.
Ejemplo
En este ejemplo se agregan dos cruces a la publicación activa y, a continuación, se establece el valor de ajuste uno (el único para este tipo de autoforma) en 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 ejemplo tiene el mismo resultado que el ejemplo anterior, aunque no utiliza explícitamente la propiedad 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
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.