Partager via


Propriété ShapeNode.SegmentType (Excel)

Cette propriété renvoie une valeur qui indique si le segment associé au nœud spécifié est un segment de droite ou de courbe. Si le nœud spécifié est le point de contrôle d'un segment de courbe, la propriété renvoie msoSegmentCurve. Type msoSegmentType en lecture seule.

Syntaxe

expression. SegmentType

Expression Variable qui représente un objet ShapeNode .

Remarques

Utilisez la méthode SetSegmentType pour définir la valeur de cette propriété.

Exemple

Cet exemple montre comment modifier tous les segments droits en segments courbés de la forme 3 de myDocument. La forme 3 doit être un dessin à main levée.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 n = 1 
 While n <= .Count 
 If .Item(n).SegmentType = msoSegmentLine Then 
 .SetSegmentType n, msoSegmentCurve 
 End If 
 n = n + 1 
 Wend 
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.