Compartilhar via

Propriedade ThreeDFormat.RotationX (Publisher)

  • Artigo

Retorna ou define a rotação da forma submetida a extrusão ao redor do eixo x em graus. Pode ser um valor de -90 a 90. Um valor positivo indica rotação para cima; um valor negativo indica rotação para baixo. Leitura/gravação único.

Sintaxe

expressão. Rotationx

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

Valor de retorno

Único

Comentários

Para definir a rotação da forma extrudada em torno do eixo y, use a propriedade RotationY .

Para definir a rotação da forma submetida a extrusão ao redor do eixo z, use a propriedade Rotation do objeto Shape.

Para alterar a direção do caminho de varredura da extrusão sem girar a face frontal da extrusão, use o método SetExtrusionDirection.

Exemplo

Este exemplo adiciona três ovais extrudados idênticos ao documento ativo e define sua rotação em torno do eixo x como -30, 0 e 30 graus, respectivamente.

Sub SetRotationX() 
 With ActiveDocument.Pages(1).Shapes 
 With .AddShape(Type:=msoShapeOval, Left:=30, _ 
 Top:=60, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationX = -30 
 End With 
 With .AddShape(Type:=msoShapeOval, Left:=90, _ 
 Top:=60, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationX = 0 
 End With 
 With .AddShape(Type:=msoShapeOval, Left:=150, _ 
 Top:=60, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationX = 30 
 End With 
 End With 
End Sub

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.