Méthode ShapeNodes.SetPosition (Publisher)
Définit la position du nœud spécifié. En fonction du type de modification, cette méthode peut affecter la position des nœuds adjacents.
Syntaxe
expression. SetPosition (Index, X1, Y1)
Expression Variable qui représente un objet ShapeNodes .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Index | Obligatoire | Integer | Nœud dont la position doit être définie. Doit être un nombre compris entre 1 et le nombre de nœuds de la forme spécifiée ; dans le cas contraire, une erreur se produit. |
X1 | Obligatoire | Variant | Position horizontale du nœud par rapport au coin supérieur gauche de la page. |
Y1 | Obligatoire | Variant | Position verticale du nœud par rapport au coin supérieur gauche de la page. |
Remarques
Pour les arguments X1 et Y1 , les valeurs numériques sont évaluées en points ; les chaînes peuvent être dans n’importe quelle unité prise en charge par Microsoft Publisher (par exemple, « 2,5 pouces »).
Exemple
Cet exemple déplace de 200 points vers la droite et de 300 points vers le bas le deuxième nœud dans la troisième forme de la composition active. La forme du dessin doit être libre.
Dim arrPoints As Variant
Dim intX As Integer
Dim intY As Integer
With ActiveDocument.Pages(1).Shapes(3).Nodes
arrPoints = .Item(2).Points
intX = arrPoints(1, 1)
intY = arrPoints(1, 2)
.SetPosition Index:=2, X1:=intX + 200, Y1:=intY + 300
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour