Propriedade Shape.Vertices (Excel)
Retorna as coordenadas dos vértices (e pontos de controle para curvas Bézier) do desenho de forma livre especificado como uma série de pares de coordenadas. Use a matriz retornada por essa propriedade como um argumento para o método AddCurve ou método AddPolyLine . Somente leitura Variant.
Sintaxe
expressão. Vértices
Expressão Uma variável que representa um objeto Shape .
Comentários
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 de vertArray | Contains |
|---|---|
vertArray(1, 1) |
A distância horizontal do primeiro vértice até o lado esquerdo do documento |
vertArray(1, 2) |
A distância vertical do primeiro vértice até a extremidade superior do documento |
vertArray(2, 1) |
A distância horizontal do segundo vértice até o lado esquerdo do documento |
vertArray(2, 2) |
A distância vertical do segundo vértice até a extremidade superior do documento |
vertArray(3, 1) |
A distância horizontal do terceiro vértice até o lado esquerdo do documento |
vertArray(3, 2) |
A distância vertical do terceiro vértice até a extremidade superior do documento |
Exemplo
Este exemplo atribui as coordenadas de vértice para a forma um no myDocument à variável vertArray()de matriz e exibe as coordenadas do primeiro vértice.
Set myDocument = Worksheets(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 deve conter 3 n+1 vértices para que este exemplo tenha êxito.
Set myDocument = Worksheets(1)
With myDocument.Shapes
.AddCurve .Item(1).Vertices
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.