Partager via


Objet ThreeDFormat (Publisher)

Représente la mise en forme en trois dimensions de la forme.

Remarques

Vous ne pouvez pas appliquer une mise en forme 3D à certains types de formes, comme les formes biseautées. La plupart des propriétés et méthodes de l'objet ThreeDFormat pour les formes échouent.

Utilisez la propriété Shape.ThreeD pour renvoyer un objet ThreeDFormat .

Exemple

Cet exemple montre comment définir la profondeur, la couleur d’extrusion, la direction d’extrusion et la direction de l’éclairage pour les effets 3D appliqués à la forme 1 dans la composition active.

Sub SetThreeDSettings() 
 Dim tdfTemp As ThreeDFormat 
 
 Set tdfTemp = _ 
 ActiveDocument.Pages(1).Shapes(1).ThreeD 
 
 With tdfTemp 
 .Visible = True 
 .Depth = 50 
 .ExtrusionColor.RGB = RGB(255, 100, 255) 
 .SetExtrusionDirection _ 
 PresetExtrusionDirection:=msoExtrusionTop 
 .PresetLightingDirection = msoLightingLeft 
 End With 
End Sub

Méthodes

Propriétés

Voir aussi

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.