共用方式為


Application.WindowDeactivate 事件 (PowerPoint)

發生在停用應用程式視窗或任何文件視窗時。

語法

表情WindowDeactivate (Pres週三)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
Pres 必要 簡報 顯示在已停用之視窗中的簡報。
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 支援與意見反應