Table of contents
Collapse the table of content
Expand the table of content

ThreeDFormat.SetThreeDFormat Method (Publisher)

office 365 dev account|Last Updated: 8/24/2017
3 Contributors

Sets the preset extrusion format. Each preset extrusion format contains a set of preset values for the 3-D properties of the extrusion.


expression. SetThreeDFormat( PresetThreeDFormat)

_expression_A variable that represents a ThreeDFormat object.


NameRequired/OptionalData TypeDescription
PresetThreeDFormatRequiredMsoPresetThreeDFormatSpecifies a preset extrusion format that corresponds to one of the options (numbered from left to right, from top to bottom) displayed when you click the 3-D button on the Drawing toolbar.


This method sets the PresetThreeDFormat property to the format specified by the PresetThreeDFormat argument.

The PresetThreeDFormat parameter can be one of the MsoPresetThreeDFormat constants declared in the Microsoft Office type library and shown in the following table.

| msoThreeD1| | msoThreeD2| | msoThreeD3| | msoThreeD4| | msoThreeD5| | msoThreeD6| | msoThreeD7| | msoThreeD8| | msoThreeD9| | msoThreeD10| | msoThreeD11| | msoThreeD12| | msoThreeD13| | msoThreeD14| | msoThreeD15| | msoThreeD16| | msoThreeD17| | msoThreeD18| | msoThreeD19| | msoThreeD20|


This example adds an oval to the active publication and sets its extrusion format to one of the preset 3-D formats.

With ActiveDocument.Pages(1).Shapes _ 
 .AddShape(Type:=msoShapeOval, _ 
 Left:=30, Top:=30, Width:=50, Height:=25).ThreeD 
 .Visible = True 
 .SetThreeDFormat PresetThreeDFormat:=msoThreeD12 
End With 
© 2018 Microsoft