Событие Application.SlideShowEnd (PowerPoint)

Происходит после окончания слайд-шоу, сразу после последнего события SlideShowNextSlide .

Синтаксис

выражение. SlideShowEnd( _Pres_ )

выражение Выражение, возвращающее объект Application .

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Пре	Обязательный	Presentation	Презентация закрыта при возникновении этого события.

Замечания

Событие SlideShowEnd всегда возникает до окончания слайд-шоу, если произошло событие SlideShowBegin . Используйте событие SlideShowEnd , чтобы вернуть все параметры свойств и инициализации переменных, которые происходят в событии SlideShowBegin , в исходные параметры.

Сведения об использовании событий с объектом Application см. в разделе Практическое руководство. Использование событий с объектом приложения.

Пример

В этом примере отключается эффект входа и эффекты перехода слайд-шоу с автоматическим переходом времени для слайдов с одного по четыре в конце слайд-шоу. Он также настраивает слайды для продвижения вручную.

Private Sub App_SlideShowEnd(ByVal Pres As Presentation)

    With Pres.Slides.Range(Array(1, 4)) _
            .SlideShowTransition

        .EntryEffect = ppEffectNone

        .AdvanceOnTime = msoFalse

    End With



    With Pres.SlideShowSettings

        .AdvanceMode = ppSlideShowManualAdvance

    End With

End Sub

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.