Partilhar via


Método Shapes.AddPolyline (PowerPoint)

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.

Sintaxe

expression. AddPolyline( _SafeArrayOfPoints_ )

expressão Uma variável que representa um objeto Formas.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
SafeArrayOfPoints Obrigatório Variant Uma matriz de pares de coordenadas que especifica os vértices do desenho de linha múltipla.

Valor de retorno

Forma

Comentários

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

Exemplo

Este exemplo adiciona um triângulo a myDocument. Em função de o primeiro e último pontos terem as mesmas coordenadas, o polígono é fechado e preenchido. A cor do triângulo interior será a mesma da cor de preenchimento padrão da forma.

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 = ActivePresentation.Slides(1)

myDocument.Shapes.AddPolyline SafeArrayOfPoints:=triArray

Confira também

Objeto Shapes

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.