Hallo Liebes VBA-Forum,

ich hoffe ich bin hier mit meinem Anliegen richtig. 

Ich möchte mittels VBA in PowerPoint eine Grafik mit einen Eingangs-/ Ausgangseffekt belegen. Der Eingangseffekt funktionier soweit. Leider habe ich keine passende Lösung gefunden um einen Ausgangseffekt (bsp. Wischen) zu definieren. Weiß jemand dazu eine Lösung? 

Mein aktueller Code:

 Sub Test_Effekt()
   

 Sub Test_Effekt()
    With ActivePresentation.Slides(3).Shapes(1).AnimationSettings
    
        .EntryEffect = ppEffectFlyFromLeft 'Einfliegen von rechts
   End With
End Sub

Ich bin für jeden ratschalg Dankbar :) 

Viele Grüße

Max