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

Статья
04/07/2023

Происходит при отключении окна приложения или любого окна документа.

Синтаксис

expression. 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 и обратная связь.

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