Shape.Model3D (Word)

Gibt ein Model3DFormat -Objekt zurück, das Model3D-Eigenschaften enthält.

For Each s In ActiveDocument.Shapes
 If s.Type = mso3DModel Then s.Model3D.AutoFit = True
Next