Propriété ThreeDFormat.PresetThreeDFormat (PowerPoint)
Renvoie le format d’extrusion prédéfini. En lecture seule.
Syntaxe
expression. PresetThreeDFormat
Expression Variable qui représente un objet ThreeDFormat .
Valeur renvoyée
MsoPresetThreeDFormat
Remarques
Cette propriété est en lecture seule. Pour définir le format d’extrusion prédéfini, utilisez la méthode SetThreeDFormat .
Chaque format d'extrusion prédéfini contient un ensemble de valeurs prédéfinies pour les différentes propriétés de l'extrusion. Les valeurs de cette propriété correspondent aux options (numérotées de gauche à droite, de haut en bas) affichées lorsque vous cliquez sur le sous-menu Rotation 3D dans le menu Effets de forme.
La valeur de la propriété PresetThreeDFormat peut être l’une de ces constantes MsoPresetThreeDFormat. Si la valeur est msoPresetThreeDFormatMixed, l’extrusion est dotée d’un format personnalisé au lieu d’un format prédéfini.
msoPresetThreeDFormatMixed |
msoThreeD1 |
msoThreeD2 |
msoThreeD3 |
msoThreeD4 |
msoThreeD5 |
msoThreeD6 |
msoThreeD7 |
msoThreeD8 |
msoThreeD9 |
msoThreeD10 |
msoThreeD11 |
msoThreeD12 |
msoThreeD13 |
msoThreeD14 |
msoThreeD15 |
msoThreeD16 |
msoThreeD17 |
msoThreeD18 |
msoThreeD19 |
msoThreeD20 |
Exemple
Cet exemple montre comment définir le format de l'extrusion de la forme 1 dans myDocument sur le style 3D 12 si le format initial d'extrusion de la forme est personnalisé.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then
.SetThreeDFormat msoThreeD12
End If
End With
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour