Método ShapeNodes.SetPosition (Excel)

Define o local do nó especificado por Index. Observe que, dependendo do tipo de edição do nó, este método pode afetar a posição de nós adjacentes.

Sintaxe

expressão. SetPosition (Index, X1, Y1)

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

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Índice	Obrigatório	Long	O nó cuja posição será definida.
X1	Obrigatório	Single	A posição (em pontos) do novo nó em relação ao canto superior esquerdo do documento.
Y1	Obrigatório	Single	A posição (em pontos) do novo nó em relação ao canto superior esquerdo do documento.

Exemplo

Este exemplo move o nó dois na forma três no myDocument para a direita 200 pontos e abaixo de 300 pontos. A forma três precisa ser um desenho de forma livre.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 pointsArray = .Item(2).Points 
 currXvalue = pointsArray(0, 0) 
 currYvalue = pointsArray(0, 1) 
 .SetPosition 2, currXvalue + 200, currYvalue + 300 
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.