Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Происходит непосредственно перед закрытием любой открытой презентации, так как она удаляется из коллекции 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
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.