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

Возникает при деактивации окна приложения или любого окна документа.

Синтаксис

выражение. WindowDeactivate (Pres,Wn)

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

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
Предыдущая статья	Обязательный	Presentation	Презентация отображается в деактивированном окне.
Wn	Обязательный	DocumentWindow	Отключенное окно документа.

Пример

В этом примере имя файла (без расширения) презентации находится в деактивируемом окне. Затем расширение .htm добавляется к имени файла и сохраняется как веб-страница в той же папке, где находится презентация.

Private Sub App_WindowDeactivate (ByVal Pres As Presentation, ByVal Wn As DocumentWindow)

    FindNum = InStr(1, Wn.Presentation.FullName, ".")

    If FindNum = 0 Then

        HTMLName = Wn.Presentation.FullName & ".htm"

    Else

        HTMLName = Mid(Wn.Presentation.FullName, 1, FindNum - 1) _
            & ".htm"

    End If

    Wn.Presentation.SaveCopyAs HTMLName, ppSaveAsHTML

    MsgBox "Presentation being saved in HTML format as " _
        & HTMLName & " ."

End Sub

См. также

Объект Application

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

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