Событие Application. Пресентатионклосе (PowerPoint)Application.PresentationClose event (PowerPoint)

Возникает непосредственно перед закрытием открытой презентации, так как она удалена из коллекции презентаций.Occurs immediately before any open presentation closes, as it is removed from the Presentations collection.

СинтаксисSyntax

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

Expression (выражение ) Выражение, возвращающее объект Application .expression An expression that returns a Application object.

ПараметрыParameters

ИмяName Обязательный или необязательныйRequired/Optional Тип данныхData type ОписаниеDescription
ПресPres ОбязательныйRequired PresentationPresentation Презентация, которая закрывается.The presentation that is being closed.

ПримерExample

В этом примере показано, как сохранить копию активной презентации в виде HTML-файла с тем же именем и в той же папке.This example saves a copy of the active presentation as an HTML file, with the same name and within the same folder.

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

См. такжеSee also

Объект ApplicationApplication Object

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

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.