Метод ShapeNodes.SetEditingType (Publisher)

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

Синтаксис

expression. SetEditingType (Index, EditingType)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Индекс;	Обязательный	Long	Узел, тип редактирования которого необходимо задать. Должно быть числом от 1 до числа узлов в указанной фигуре; В противном случае возникает ошибка.
EditingType	Обязательный	MsoEditingType	Свойство редактирования узла. Может быть одной из констант 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 intNode 
End With 

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

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