Propriété ShapeNode.EditingType (Publisher)

Si le nœud spécifié est un sommet, cette propriété renvoie une constante MsoEditingType indiquant comment les modifications apportées au nœud affectent les deux segments connectés au nœud. Si le nœud est un point de contrôle d'un segment courbé, cette propriété renvoie le type d'édition du sommet adjacent. En lecture seule.

Syntaxe

expression. EditingType

Expression Variable qui représente un objet ShapeNode .

Valeur renvoyée

MsoEditingType

Remarques

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

La valeur de la propriété EditingType peut être une des constantes MsoEditingType déclarées dans la bibliothèque de type Microsoft Office.

Exemple

Cet exemple change tous les nœuds de coin en nœuds de courbe lisse dans la troisième forme de la composition active. La forme du dessin doit être libre.

Dim intNode As Integer 
 
With ActiveDocument.Pages(1).Shapes(3).Nodes 
 For intNode = 1 to .Count 
 If .Item(intNode).EditingType = msoEditingCorner Then 
 .SetEditingType Index:=intNode, _ 
 EditingType:=msoEditingSmooth 
 End If 
 Next 
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.