Change Font Color animation not working properly
Sir Need some help..
I want to use change font color animation in my project so that text color change from white to green.
But it don't work all times and sometimes changed to orange color instead of green. I search web a lot & do not find correct answer.
When analysis I found that most of the time after running the code it turns to orange but when check with vba code the color code shows its green.
I think powerpoint sometimes not able to update the color after running the code. So how can I get desire result i.e. changed to green color.
Any solution will be highly appreciate.
The code I have tried:
Code:
Sub changeColor()
Dim osld As Slide
Dim shpTop As Shape
Dim oeff As Effect
Set osld = ActivePresentation.Slides(1)
Set shpTop = osld.Shapes("Text_1")
Set oeff = osld.TimeLine.MainSequence.AddEffect(Shape:=shpTop, effectid:=msoAnimEffectChangeFontColor, trigger:=msoAnimTriggerNone)
oeff.EffectParameters.Color2 = RGB(0, 255, 0)
oeff.Timing.TriggerType = msoAnimTriggerWithPrevious
oeff.Timing.TriggerDelayTime = 1
oeff.Timing.Duration = 0.5
End Sub