Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
Cette propriété renvoie ou définit un Variant indiquant la valeur d'ajustement spécifiée par l'argument Index. Lecture-écriture.
Syntaxe
expression. Élément (Index)
expression Variable qui représente un objet Adjustments .
Paramètres
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Index | Obligatoire | Entier | Numéro d'index de l'ajustement. |
Remarques
Les formes automatiques, les connecteurs et les objets WordArt peuvent avoir jusqu'à huit ajustements.
Pour des ajustements linéaires, la valeur 0 correspond généralement au côté gauche ou supérieur de la forme et la valeur 1 au côté droit ou inférieur. 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.
Exemple
Cet exemple montre comment ajouter deux croix à la composition active, puis définir la valeur d’ajustement 1 (la seule pour ce type de forme automatique) sur chaque croix.
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
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.
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
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.