Propriedade ShapeNode.SegmentType (Excel)

Retorna um valor que indica se o segmento associado com o nó especificado é reto ou curvo. Se o nó especificado for um ponto de controle de um segmento curvo, essa propriedade retornará msoSegmentCurve. MsoSegmentType somente leitura.

Sintaxe

expressão. SegmentType

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

Comentários

Use o método SetSegmentType para definir o valor dessa propriedade.

Exemplo

Este exemplo altera todos os segmentos retos para segmentos curvos na forma três em myDocument. A forma três precisa ser um desenho de forma livre.

Set myDocument = Worksheets(1) 
With myDocument.Shapes(3).Nodes 
 n = 1 
 While n <= .Count 
 If .Item(n).SegmentType = msoSegmentLine Then 
 .SetSegmentType n, msoSegmentCurve 
 End If 
 n = n + 1 
 Wend 
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.