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

Статья
04/07/2023

Происходит непосредственно перед закрытием любой открытой презентации, так как она удаляется из коллекции Presentations .

Синтаксис

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

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

Параметры

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

Пример

В этом примере копия активной презентации сохраняется в виде HTML-файла с тем же именем и в той же папке.

Private Sub App_PresentationClose(ByVal Pres As Presentation)
    FindNum = InStr(1, Pres.FullName, ".")
    HTMLName = Mid(Pres.FullName, 1, FindNum - 1) _
        & ".htm"
    Pres.SaveCopyAs HTMLName, ppSaveAsHTML
End Sub

См. также

Объект Application

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

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

Поделиться через