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

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

Синтаксис

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

выражение: переменная, представляющая объект Application.

Параметры

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

Замечания

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

Пример

В этом примере текущая презентация сохраняется как HTML-файл версии 4.0 с именем "mallard.htm". Затем отображается сообщение о том, что текущая именованной презентации сохраняется в форматах PowerPoint и HTML.

Private Sub App_PresentationSave(ByVal Pres As Presentation)
    With Pres.PublishObjects(1)

        PresName = .SlideShowName
        .SourceType = ppPublishAll
        .FileName = "C:\HTMLPres\mallard.htm"
        .HTMLVersion = ppHTMLVersion4

        MsgBox ("Saving presentation " & "'" _
            & PresName & "'" & " in PowerPoint" _
            & Chr(10) & Chr(13) _
            & " format and HTML version 4.0 format")
			
        .Publish
    End With
End Sub

См. также

Объект Application

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

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