Remarque
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.
Définit le type de modification du nœud spécifié. Si celui-ci est un point de contrôle d'un segment courbé, cette méthode définit le type de modification du nœud adjacent à celui qui joint deux segments. En fonction du type de modification, cette méthode peut affecter la position des nœuds adjacents.
Syntaxe
expression. SetEditingType (Index, EditingType)
Expression Variable qui représente un objet ShapeNodes .
Parameters
| Nom | Requis/Facultatif | Type de données | Description |
|---|---|---|---|
| Index | Obligatoire | Entier long | Nœud dont le type de modification doit être défini. Doit être un nombre compris entre 1 et le nombre de nœuds de la forme spécifiée ; dans le cas contraire, une erreur se produit. |
| EditingType | Obligatoire | MsoEditingType | Propriété de modification du nœud. Il peut s’agir de l’une des constantes MsoEditingType déclarées dans la bibliothèque de type Microsoft Office. |
Exemple
Cet exemple change tous les nœuds d'angle en nœuds lisses 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 intNode
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.