次のスライドに行く前にパワーポイントスライド間の特定のトランジションを設定するマクロ

Question

すべてのスライドが「左からプッシュ」に設定されているスライドショーに取り組んでいます。私はすべてのスライドに前のボタンに戻るためにボタンを挿入するつもりです。ちょうどボタンが押されたときに、私は「右から押してください」への切り替えを切り替えて、前のスライドに行き、次にもう一度「左から押す」に移行します。 は、私がこれを書いたが、それは動作しません：

Sub previousslide() 
With ActivePresentation.SlideShowWindow.View 
    .Slide.SlideShowTransition.EntryEffect = ppEffectPushRight 
    .GotoSlide (ActivePresentation.SlideShowWindow.View.Slide.SlideIndex - 1) 
    .Slide.SlideShowTransition.EntryEffect = ppEffectPushLeft 
End Sub 

おかげ

Answer 1

あなたが欠けているブロック付でエンドを完了するために、「で終わります」。また、アクティブなプレゼンテーションがある場合にのみ機能するため、ActivePresentationオブジェクトの参照をスキップします。 .PPSX/.PPSMファイルの実行中に上記のコードを実行すると、コードは失敗します。以下のコードは参照を削除します。

Sub PreviousSlide() 
With SlideShowWindows(1).View 
    .Slide.SlideShowTransition.EntryEffect = ppEffectPushRight 
    .GotoSlide (SlideShowWindows(1).View.Slide.SlideIndex - 1) 
    .Slide.SlideShowTransition.EntryEffect = ppEffectPushLeft 
End With 
End Sub