Partager via


Propriété ThreeDFormat.RotationY (Publisher)

Cette propriété renvoie ou définit la rotation de la forme extrudée autour de l'axe y, en degrés. Il peut s’agir d’une valeur comprise entre -90 et 90. Une valeur positive indique une rotation vers la gauche et une valeur négative une rotation vers la droite. String en lecture/écriture.

Syntaxe

expression. RotationY

Expression Variable qui représente un objet ThreeDFormat .

Valeur renvoyée

Unique

Remarques

Pour définir la rotation de la forme extrudée autour de l’axe X, utilisez la propriété RotationX .

Pour définir la rotation de la forme extrudée autour de l'axe des z, utilisez la propriété Rotation de l'objet Shape.

Pour changer la direction du chemin de balayage de l'extrusion sans faire pivoter la face avant de l'extrusion, utilisez la méthode SetExtrusionDirection.

Exemple

Cet exemple montre comment ajouter trois ovales extrudés identiques au document actif et définir leur rotation autour de l’axe y sur -30, 0 et 30 degrés, respectivement.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.