Shapes.AddPolyline (Excel)

Cria uma polilinha aberta ou um polígono fechado de desenho. Retorna um objeto Shape que representa a nova linha múltipla ou polígono.

Para formar um polígono fechado, atribua as mesmas coordenadas ao primeiro e último vértices no desenho de linha múltipla.

AddPolyline (SafeArrayOfPoints)

SafeArrayOfPoints: Uma matriz de pares de coordenadas que especifica os vértices do desenho de linha múltipla.

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