Propriété ShapeNode.EditingType (Word)
Si le nœud spécifié est un sommet, cette propriété renvoie une valeur qui indique comment les modifications apportées au nœud affectent les deux segments connectés au nœud. En lecture seule MsoEditingType. .
Syntaxe
expression. EditingType
expression Obligatoire. Variable qui représente un objet ShapeNode.
Remarques
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. Cette propriété est en lecture seule. Utilisez la méthode SetEditingType pour définir la valeur de cette propriété.
Exemple
Cet exemple montre comment arrondir tous les angles de la troisième forme du document actif. Cette forme géométrique doit être une forme libre.
Dim docActive As Document
Dim intCount As Integer
Set docActive = ActiveDocument
With docActive.Shapes(3).Nodes
For intCount = 1 to .Count
If .Item(intCount).EditingType = msoEditingCorner Then
.SetEditingType intCount, msoEditingSmooth
End If
Next
End With
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.