Поделиться через


Свойство ShapeNode.EditingType (Publisher)

Если указанный узел является вершиной, это свойство возвращает константу MsoEditingType, указывающую , как изменения, внесенные в узел, влияют на два сегмента, подключенные к узлу. Если узел является контрольной точкой для изогнутого сегмента, это свойство возвращает тип редактирования соседней вершины. Только для чтения.

Синтаксис

expression. EditingType

Выражение Переменная, представляющая объект ShapeNode .

Возвращаемое значение

MsoEditingType

Замечания

Используйте метод SetEditingType , чтобы задать значение этого свойства.

Значение свойства EditingType может быть одной из констант MsoEditingType , объявленных в библиотеке типов Microsoft Office.

Пример

В этом примере все угловые узлы изменяются на узлы сглаживания кривой в третьей фигуре активной публикации. Фигура должна быть рисунком свободной формы.

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 

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.