Sequence.ConvertToAfterEffect method (PowerPoint)
Specifies what an effect should do after it is finished. Returns an Effect object that represents an after effect.
Syntax
expression. ConvertToAfterEffect
( _Effect_
, _After_
, _DimColor_
, _DimSchemeColor_
)
expression A variable that represents a Sequence object.
Parameters
Name | Required/Optional | Data type | Description |
---|---|---|---|
Effect | Required | Effect | The effect to which the after effect will be added. |
After | Required | MsoAnimAfterEffect | The behavior of the after effect. |
DimColor | Optional | MsoRGBType | A single color to apply the after effect. |
DimSchemeColor | Optional | PpColorSchemeIndex | A predefined color scheme to apply to the after effect. |
Return value
Effect
Remarks
Do not use both the DimColor and DimSchemeColor arguments in the same call to this method. An after effect may have one color, or use a predefined color scheme, but not both.
Example
The following example sets a dim color for an after effect on the first shape on the first slide in the active presentation. This example assume there is a shape on the first slide.
Sub ConvertToDim()
Dim shpSelected As Shape
Dim sldActive As Slide
Dim effConvert As Effect
Set sldActive = ActivePresentation.Slides(1)
Set shpSelected = sldActive.Shapes(1)
' Add an animation effect.
Set effConvert = sldActive.TimeLine.MainSequence.AddEffect _
(Shape:=shpSelected, effectId:=msoAnimEffectBounce)
' Add a dim after effect.
Set effConvert = sldActive.TimeLine.MainSequence.ConvertToAfterEffect _
(Effect:=effConvert, After:=msoAnimAfterEffectDim, _
DimColor:=RGB(Red:=255, Green:=255, Blue:=255))
End Sub
See also
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.
Feedback
https://aka.ms/ContentUserFeedback.
Coming soon: Throughout 2024 we will be phasing out GitHub Issues as the feedback mechanism for content and replacing it with a new feedback system. For more information see:Submit and view feedback for