Application.ProtectedViewWindowBeforeClose Event (Word)
Occurs immediately before a protected view window or a document in a protected view window closes.
expression An expression that returns an 'Application' object.
|Name|Required/Optional|Data Type|Description| |:-----|:-----|:-----|:-----| | PvWindow|Required| ProtectedViewWindow|The protected view window that is closed.| | CloseReason|Required| [INT]|A constant in the WdProtectedViewCloseReason enumeration that specifies the reason the protected view window is closed.| | Cancel|Required| Boolean| False when the event occurs. If the event procedure sets this argument to True , the window does not close when the procedure is finished. Note If the ProtectedViewWindowsBeforeClose event is called as part of theProtectedView.Edit method, setting Cancel to True produces no action.
The following code example prompts the user for a yes or no response before closing any document. This code must be placed in a class module, and an instance of the class must be correctly initialized to see this example work. For more information about how to do this, see Using Events with the Application Object.
The following code example assumes that you have declared an application variable called "App" in your general declarations and have set the variable equal to the Word Application object.
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