Метод Shapes.AddPolyline (Excel)

Статья
04/07/2023

Создает открытый многолинейный рисунок или рисунок закрытого многоугольника. Возвращает объект Shape , представляющий новую многолинейную линию или многоугольник.

Синтаксис

expression. AddPolyline (SafeArrayOfPoints)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
SafeArrayOfPoints	Обязательный	Variant	Массив пар координат, указывающий вершины многолинейного рисунка.

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

Shape

Замечания

Чтобы сформировать замкнутый многоугольник, присвойте те же координаты первой и последней вершинам в документе полилайна.

Пример

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

Dim triArray(1 To 4, 1 To 2) As Single 
triArray(1, 1) = 25 
triArray(1, 2) = 100 
triArray(2, 1) = 100 
triArray(2, 2) = 150 
triArray(3, 1) = 150 
triArray(3, 2) = 50 
triArray(4, 1) = 25 ' Last point has same coordinates as first 
triArray(4, 2) = 100 
Set myDocument = Worksheets(1) 
myDocument.Shapes.AddPolyline triArray

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

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

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