Klasse Model3DFormat (Word VBA)

Die Klasse Model3DFormat stellt die Eigenschaften einer 3D-Modellform dar.

Set

Um eine Model3DFormat -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim mdf as Model3DFormat
Set mdf = ActiveDocument.Background.Model3D

Die folgenden Prozeduren können zum Festlegen der Model3DFormat Klassenvariablen verwendet werden : InlineShape.Model3D, Shape.Model3D und ShapeRange.Model3D

Eigenschaften

AutoFit Gibt zurück, ob die automatische Anpassung für das Modell aktiviert ist.

ActiveDocument.Background.Model3D.AutoFit =

CameraPositionX Gibt die x-Koordinate der Kameraposition eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.CameraPositionX =

CameraPositionY Gibt die y-Koordinate der Kameraposition eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.CameraPositionY =

CameraPositionZ Gibt die z-Koordinate der Kameraposition eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.CameraPositionZ =

FieldOfView Gibt den Blickwinkel der Kamera eines 3D-Modellobjekts zurück, ausgedrückt in Grad.

ActiveDocument.Background.Model3D.FieldOfView =

LookAtPointX Gibt die x-Koordinate der kameradarstellung eines 3D-Modellobjekts an Position zurück.

ActiveDocument.Background.Model3D.LookAtPointX =

LookAtPointY Gibt die y-Koordinate der kameradarstellung eines 3D-Modellobjekts an Position zurück.

ActiveDocument.Background.Model3D.LookAtPointY =

LookAtPointZ Gibt die z-Koordinate der kameradarstellung eines 3D-Modellobjekts an Position zurück.

ActiveDocument.Background.Model3D.LookAtPointZ =

Parent Gibt das übergeordnete Objekt für das angegebene Objekt zurück.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Model3D.Parent

RotationX Gibt den x-Winkel der Drehung eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.RotationX =

RotationY Gibt den y-Winkel der Drehung eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.RotationY =

RotationZ Gibt den z-Winkel der Drehung eines 3D-Modellobjekts zurück.

ActiveDocument.Background.Model3D.RotationZ =