共用方式為


PowerPoint) (Application.WindowDeactivate 事件

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

語法

運算式WindowDeactivate (PresWn)

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 支援與意見反應