Share via


Método FreeformBuilder.ConvertToShape (PowerPoint)

Cria uma forma que tem as características geométricas do objeto FreeformBuilder especificado. Retorna um objeto Shape que representa a nova forma.

Sintaxe

expression. ConvertToShape

Expressão Uma variável que representa um objeto FreeformBuilder .

Valor de retorno

Forma

Comentários

Você deve aplicar o método AddNodes a um objeto FreeformBuilder pelo menos uma vez antes de usar o método ConvertToShape.

Exemplo

Este exemplo adiciona uma forma livre com cinco vértices ao primeiro slide na apresentação ativa.

Set myDocument = ActivePresentation.Slides(1)

With myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200)
    .AddNodes msoSegmentCurve, _
        msoEditingCorner, 380, 230, 400, 250, 450, 300
    .AddNodes msoSegmentCurve, msoEditingAuto, 480, 200
    .AddNodes msoSegmentLine, msoEditingAuto, 480, 400
    .AddNodes msoSegmentLine, msoEditingAuto, 360, 200
    .ConvertToShape
End With

Confira também

Objeto FreeformBuilder

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.