Propriedade ThreeDFormat.ExtrusionColor (Word)

Retorna um objeto ColorFormat que representa a cor da extrusão da forma. Somente leitura.

Sintaxe

expression. ExtrusionColor

expressão Uma variável que representa um objeto "ThreeDFormat".

Exemplo

Este exemplo adiciona uma elipse ao documento ativo e, em seguida, especifica que a elipse sofra extrusão a uma profundidade de 50 pontos e que a extrusão seja roxa.

Dim docActive As Document 
Dim shapeNew As Shape 
 
Set docActive = ActiveDocument 
Set shapeNew = docActive.Shapes.AddShape(msoShapeOval, _ 
 90, 90, 90, 40) 
With shapeNew.ThreeD 
 .Visible = True 
 .Depth = 50 
 ' RGB value for purple 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
End With

Confira também

Objeto ThreeDFormat

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.