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 eine Instanz 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
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.