Método FreeformBuilder.AddNodes (Excel)

Adiciona um ponto na forma atual e desenha uma linha do nó atual para o último nó que foi adicionado.

Sintaxe

expressão. AddNodes (SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
SegmentType	Obrigatório	MsoSegmentType	O tipo de segmento a ser adicionado.
EditingType	Obrigatório	MsoEditingType	A propriedade de edição do vértice.
X1	Obrigatório	Single	Se o EditingType do novo segmento for msoEditingAuto, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o ponto final do novo segmento. Se o EditingType do novo nó for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o primeiro ponto de controle do novo segmento.
Y1	Obrigatório	Single	Se o EditingType do novo segmento for msoEditingAuto, este argumento especificará a distância horizontal (em pontos) a partir do canto superior esquerdo do documento até o ponto final do novo segmento. Se o EditingType do novo nó for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o primeiro ponto de controle do novo segmento.
X2	Opcional	Variantes	Se o EditingType do novo segmento for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o segundo ponto de controle do novo segmento. Se o EditingType do novo segmento for msoEditingAuto, não especifique um valor para esse argumento.
Y2	Opcional	Variantes	Se o EditingType do novo segmento for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o segundo ponto de controle do novo segmento. Se o EditingType do novo segmento for msoEditingAuto, não especifique um valor para esse argumento.
X3	Opcional	Variantes	Se o EditingType do novo segmento for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o segundo ponto de controle do novo segmento. Se o EditingType do novo segmento for msoEditingAuto, não especifique um valor para esse argumento.
Y3	Opcional	Variantes	Se o EditingType do novo segmento for msoEditingCorner, esse argumento especificará a distância horizontal (em pontos) do canto superior esquerdo do documento até o segundo ponto de controle do novo segmento. Se o EditingType do novo segmento for msoEditingAuto, não especifique um valor para esse argumento.

Comentários

MsoEditingType não pode ser msoEditingSmooth ou msoEditingSymmetric. Se SegmentType for msoSegmentLine, EditingType deverá ser msoEditingAuto.

Exemplo

Este exemplo adiciona uma forma livre com quatro segmentos a myDocument.

Set myDocument = Worksheets(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

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.