PresetLightingSoftness Property

Microsoft PowerPoint Visual Basic

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