Partager via

ShapeNodes.SetPosition, méthode (Excel)

  • Article

Définit l’emplacement du nœud spécifié par l’argument Index. Remarquez que, selon le type de modification du nœud, cette méthode peut modifier 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 Entier long Indique le nœud à positionner.
X1 Obligatoire Unique Position (en points) du nouveau nœud par rapport au coin supérieur gauche du document.
Y1 Obligatoire Single Position du nouveau nœud (en points) par rapport au coin supérieur gauche du document.

Exemple

Cet exemple montre comment déplacer le nœud 2 de la forme 3 de myDocument vers la droite de 200 points et 300 points vers le bas. La forme 3 doit être un dessin à main levée.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 pointsArray = .Item(2).Points 
 currXvalue = pointsArray(0, 0) 
 currYvalue = pointsArray(0, 1) 
 .SetPosition 2, currXvalue + 200, currYvalue + 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.