Remarque
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de vous connecter ou de modifier des répertoires.
L’accès à cette page nécessite une autorisation. Vous pouvez essayer de modifier des répertoires.
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
- Application
- BevelBottomDepth
- BevelBottomInset
- BevelBottomType
- BevelTopDepth
- BevelTopInset
- BevelTopType
- ContourColor
- ContourWidth
- Depth
- ExtrusionColor
- ExtrusionColorType
- FieldOfView
- Parent
- Perspective
- PresetExtrusionDirection
- PresetLightingDirection
- PresetLightingSoftness
- PresetMaterial
- PresetThreeDFormat
- RotationX
- RotationY
- Visible
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.