Returns or sets the intensity of the extrusion lighting. Read/write MsoPresetLightingSoftness.
MsoPresetLightingSoftness can be one of these MsoPresetLightingSoftness constants. |
msoLightingBright |
msoLightingDim |
msoLightingNormal |
msoPresetLightingSoftnessMixed |
expression.PresetLightingSoftness
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example specifies that the extrusion for shape one on myDocument
be lit brightly from the left.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(1).ThreeD
.Visible = True
.PresetLightingSoftness = msoLightingBright
.PresetLightingDirection = msoLightingLeft
End With