Propriété ThreeDFormat.RotationX (Publisher)

Article
04/07/2023

Cette propriété renvoie ou définit la rotation de la forme extrudée autour de l'axe des x en degrés. Il peut s’agir d’une valeur comprise entre -90 et 90. Une valeur positive indique une rotation vers le haut ; une valeur négative indique une rotation vers le bas. En lecture/écriture unique.

Syntaxe

expression. RotationX

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 y, utilisez la propriété RotationY .

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 ajoute trois ovales extrudés identiques au document actif et définit leur rotation autour de l’axe X sur -30, 0 et 30 degrés, respectivement.

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

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.

Partager via