ThreeDFormat.PresetLightingDirection property (Word)
Returns or sets the position of the light source relative to the extrusion. Read/write MsoPresetLightingDirection.
expression Required. A variable that represents a 'ThreeDFormat' object.
The lighting effects you set will not be apparent if the extrusion has a wireframe surface.
This example specifies that the extrusion for shape one on myDocument extend toward the top of the shape and that the lighting for the extrusion come from the left.
Set myDocument = ActiveDocument With myDocument.Shapes(1).ThreeD .Visible = True .SetExtrusionDirection msoExtrusionTop .PresetLightingDirection = msoLightingLeft End With
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.