共用方式為


Application.ProtectedViewWindowBeforeClose 事件 (Word)

會緊接在 [受保護的檢視] 視窗或 [受保護的檢視] 視窗中的檔關閉之前發生。

語法

expressionProtectedViewWindowBeforeClose( _PvWindow_ , _CloseReason_ , _Cancel_ )

表達 會傳回 Application 物件的運算式。

參數

名稱 必要/選用 資料類型 描述
PvWindow 必要 ProtectedViewWindow 已關閉的 [受保護的檢視] 視窗。
CloseReason 必要 [INT] WdProtectedViewCloseReason列舉中的常數,指定 [受保護的檢視] 視窗關閉的原因。
Cancel 必要 布林值 False 事件發生時。 如果事件程序會將此引數設定為 True ,視窗不會關閉完成此程序。

注意事項

如果 ProtectedViewWindowsBeforeClose 事件呼叫為 ProtectedView.Edit 方法的一部分,則將 Cancel 設定為 True 不會產生任何動作。

|

範例

下列程式碼範例會在關閉任何文件之前,提示使用者確認是否要這麼做。 這個程式碼必須放置在類別模組中,而且必須正確地初始化該類別的執行個體,這個範例才能正常運作。 如需如何執行這項操作的詳細資訊,請 參閱搭配 Application 物件使用事件

下列程式碼範例會假設您已經在一般宣告中宣告了名稱為 "App" 的應用程式變數,並且已將該變數設定為與 Word Application 物件相同。

Private Sub App_ProtectedViewWindowBeforeClose(ByVal PvWindow As ProtectedViewWindow, ByVal CloseReason As Long, Cancel As Boolean) 
Dim intResponse As Integer 
 
    intResponse = MsgBox("Do you really " _ 
        & "want to close the document?", _ 
        vbYesNo) 
 
    If intResponse = vbNo Then Cancel = True 
 
End Sub

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應