Adjustments.Item, propriété (Word)
Renvoie ou définit la valeur d’ajustement spécifiée par l’argument Index . String en lecture/écriture.
Syntaxe
expression. Élément (Index)
Expression Expression qui renvoie un objet « Adjustments ».
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Index | Obligatoire | Entier long | Numéro d'index de l'ajustement. |
Remarques
Pour des ajustements linéaires, une valeur de réglage de 0,0 correspond généralement sur le bord gauche ou supérieur de la forme et une valeur de 1.0 correspond généralement sur le bord droit ou inférieur de la forme. Toutefois, les ajustements peuvent passer au-delà des limites de la forme pour certaines formes. Pour les ajustements radiales, une valeur de réglage de 1,0 correspond à la largeur de la forme. Pour les ajustements angulaires, la valeur de réglage est spécifiée en degrés. La propriété Item s'applique uniquement à des formes possédant des ajustements. Les formes automatiques et objets WordArt ont jusqu'à huit ajustements.
Exemple
Cet exemple montre comment ajouter deux croix au document actif, puis comment définir la valeur de l'ajustement numéro un (le seul dont dispose cette forme automatique) pour chaque croix.
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
Cet exemple a le même résultat que l'exemple précédent, même si elle n'utilise pas explicitement la propriété 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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.