Freigeben über


ThreeDFormat.PresetThreeDFormat-Eigenschaft (Publisher)

Gibt eine MsoPresetThreeDFormat-Konstante zurück, die das voreingestellte Extrusionsformat darstellt. Schreibgeschützt.

Syntax

Ausdruck. PresetThreeDFormat

Ausdruck Eine Variable, die ein ThreeDFormat-Objekt darstellt.

Rückgabewert

MsoPresetThreeDFormat

Hinweise

Der Wert der PresetThreeDFormat -Eigenschaft kann eine der in der Microsoft Office-Typbibliothek deklarierten MsoPresetThreeDFormat -Konstanten sein.

Jedes voreingestellte Extrusionsformat enthält eine Reihe von voreingestellten Werten für die verschiedenen Eigenschaften der Extrusion. Wenn die Extrusion anstelle eines voreingestellten Formats ein benutzerdefiniertes Format aufweist, gibt diese Eigenschaft msoPresetThreeDFormatMixed zurück.

Die Werte für diese Eigenschaft entsprechen den Optionen (nummeriert von links nach rechts, von oben nach unten), die angezeigt werden, wenn Sie die Schaltfläche 3D-Format auf der Formatierungssymbolleiste auswählen.

Verwenden Sie die SetThreeDFormat -Methode, um das voreingestellte Extrusionsformat festzulegen.

Beispiel

In diesem Beispiel wird das Extrusionsformat für die erste Form auf der ersten Seite der aktiven Publikation auf 3D-Format 12 festgelegt, wenn die Form anfänglich über ein benutzerdefiniertes Extrusionsformat verfügt. Damit dieses Beispiel funktioniert, muss die angegebene Form eine 3D-Form sein.

Sub SetPreset3D() 
 With ActiveDocument.Pages(1).Shapes(1).ThreeD 
 If .PresetThreeDFormat = msoPresetThreeDFormatMixed Then 
 .SetThreeDFormat msoThreeD12 
 End If 
 End With 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.