object that represents the color to dim to after an animation is finished.
expression.Dim
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example displays the color to dim to after the animation.
Sub QueryDimColor()
Dim effDim As Effect
Set effDim = ActivePresentation.Slides(1).TimeLine.MainSequence(1)
MsgBox effDim.EffectInformation.Dim
End Sub