Note
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.
Cet objet représente la géométrie et les propriétés de modification de la géométrie des nœuds d'une forme libre définie par l'utilisateur.
Remarques
Les noeuds comprennent les sommets entre les segments de la forme libre et les points de contrôle des segments courbés. L'objet ShapeNode est membre de la ShapeNodes collection. La collection ShapeNodes contient tous les nœuds d'une forme libre.
Exemple
Utilisez Nodes (index), où index est le numéro d’index du nœud, pour renvoyer un seul objet ShapeNode . Si le nœud 1 de la forme 3 de myDocument est un point d'angle, l'exemple suivant montre comment le transformer en point lisse. Pour que cet exemple fonctionne, la forme 3 doit être une forme libre.
Set myDocument = Worksheets(1)
With myDocument.Shapes(3)
If .Nodes(1).EditingType = msoEditingCorner Then
.Nodes.SetEditingType 1, msoEditingSmooth
End If
End With
Propriétés
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.