function NewTimeLineEffect(){
    let sldFirst = ActivePresentation.Slides.Item(1)
    let shpFirst = sldFirst.Shapes.Item(1)
    sldFirst.TimeLine.MainSequence.AddEffect(shpFirst, msoAnimEffectBounce)
}