Метод ShapeNodes.SetPosition (Excel)

Задает расположение узла, указанного индексом. Обратите внимание, что в зависимости от типа редактирования узла этот метод может повлиять на положение смежных узлов.

Синтаксис

expression. SetPosition (Index, X1, Y1)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Индекс;	Обязательный	Long	Узел, положение которого необходимо задать.
X1	Обязательный	Single	Позиция (в точках) нового узла относительно левого верхнего угла документа.
Y1	Обязательный	Single	Позиция (в точках) нового узла относительно левого верхнего угла документа.

Пример

В этом примере узел 2 в форме 3 на myDocument перемещается вправо на 200 точек и вниз на 300 точек. Фигура три должна быть рисунком свободной формы.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 pointsArray = .Item(2).Points 
 currXvalue = pointsArray(0, 0) 
 currYvalue = pointsArray(0, 1) 
 .SetPosition 2, currXvalue + 200, currYvalue + 300 
End With

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

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