Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna as coordenadas dos vértices do desenho de forma livre especificado (e os pontos de controle das curvas de Bézier) como uma sequência de pares de coordenadas. Somente leitura.
Sintaxe
expressão. Vértices
expressão Uma variável que representa um objeto Shape.
Valor de retorno
Variant
Comentários
Utilize a matriz devolvida por esta propriedade como um argumento para o método AddCurve ou o método AddPolyline .
A tabela a seguir mostra como a propriedade Vertices associa os valores de matriz vertArray() às coordenadas dos vértices de um triângulo.
| elemento VertArray | Contém |
|---|---|
VertArray(1, 1) |
A distância horizontal do primeiro vértice até o lado esquerdo do slide |
VertArray(1, 2) |
A distância vertical do primeiro vértice até a parte superior do slide |
VertArray(2, 1) |
A distância horizontal do segundo vértice até o lado esquerdo do slide |
VertArray(2, 2) |
A distância vertical do segundo vértice até a parte superior do slide |
VertArray(3, 1) |
A distância horizontal do terceiro vértice até o lado esquerdo do slide |
VertArray(3, 2) |
A distância vertical do terceiro vértice até a parte superior do slide |
Exemplo
Este exemplo atribui as coordenadas de vértice da forma um em myDocument à variável vertArray() de matriz e apresenta as coordenadas do primeiro vértice.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1)
vertArray = .Vertices
x1 = vertArray(1, 1)
y1 = vertArray(1, 2)
MsgBox "First vertex coordinates: " & x1 & ", " & y1
End With
Este exemplo cria uma curva com a mesma descrição geométrica que a forma um em myDocument. A forma um tem de conter 3 n +1 vértices para que este exemplo seja bem-sucedido.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
.AddCurve .Item(1).Vertices
End With
Confira também
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.