Application.ProtectedViewWindowBeforeClose 事件 (Word)
會緊接在 [受保護的檢視] 視窗或 [受保護的檢視] 視窗中的檔關閉之前發生。
語法
expression。 ProtectedViewWindowBeforeClose
( _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
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。