Compartilhar via

Propriedade ThreeDFormat.RotationY (Publisher)

  • Artigo

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

Sintaxe

expressão. Rotationy

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 x, use a propriedade RotationX .

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 y como -30, 0 e 30 graus, respectivamente.

Sub SetRotationY() 
 With ActiveDocument.Pages(1).Shapes 
 With .AddShape(Type:=msoShapeOval, Left:=30, _ 
 Top:=120, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationY = -30 
 End With 
 With .AddShape(Type:=msoShapeOval, Left:=90, _ 
 Top:=120, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationY = 0 
 End With 
 With .AddShape(Type:=msoShapeOval, Left:=150, _ 
 Top:=120, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .RotationY = 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.