Application.ProtectedViewWindowBeforeClose-Ereignis (Word)

Tritt unmittelbar vor dem Schließen eines Geschützten Ansichtsfensters oder eines Dokuments in einem Geschützten Ansichtsfenster auf.

Syntax

Ausdruck. ProtectedViewWindowBeforeClose( _PvWindow_ , _CloseReason_ , _Cancel_ )

Ausdruck Ein Ausdruck, der ein Application-Objekt zurückgibt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
PvWindow	Erforderlich	ProtectedViewWindow	Das fenster Geschützte Ansicht, das geschlossen ist.
CloseReason	Erforderlich	[INT]	Eine Konstante in der WdProtectedViewCloseReason-Enumeration , die den Grund angibt, warum das Fenster geschützte Ansicht geschlossen wird.
Cancel	Erforderlich	Boolean	False, Wenn das Ereignis auftritt. Wenn die Ereignisprozedur dieses Argument auf True festgelegt wird, wird das Fenster beim Beenden der Prozedur nicht geschlossen.

Hinweis

Wenn das ProtectedViewWindowsBeforeClose-Ereignis als Teil der ProtectedView.Edit-Methode aufgerufen wird, führt das Festlegen von Cancel auf True zu keiner Aktion.

|

Beispiel

Im folgenden Codebeispiel wird der Benutzer aufgefordert, eine Ja- oder Nein-Antwort einzugeben, bevor ein Dokument geschlossen wird. Dieser Code muss in einem Klassenmodul platziert werden, und ein instance der Klasse muss ordnungsgemäß initialisiert werden, damit dieses Beispiel funktioniert. Weitere Informationen dazu finden Sie unter Verwenden von Ereignissen mit dem Application-Objekt.

Im folgenden Codebeispiel wird davon ausgegangen, dass Sie in Ihren allgemeinen Deklarationen eine Anwendungsvariable mit dem Namen App deklariert und die Variable so festgelegt haben, dass sie dem Application-Objekt von Word entspricht.

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

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.