Application.DocumentBeforeSave-Ereignis (Word)

  • Artikel

Tritt ein, bevor ein geöffnetes Dokument gespeichert wird.

Syntax

Ausdruck. DocumentBeforeSave (DocAs Document**, SaveAsUIAs Boolean, CancelAs Boolean)

Ausdruck Eine Variable, die ein Application-Objekt darstellt, das mit Ereignissen in einem Klassenmodul deklariert wird.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Doc Erforderlich Document Das Dokument, das gespeichert wird.
SaveAsUI Erforderlich Boolean True, wenn das Speichern unter-Dialogfeld angezeigt wird, ob ein neues Dokument gespeichert werden soll, als Reaktion auf den Speichern-Befehl; oder als Reaktion auf den Speichern unter-Befehl; oder als Reaktion auf die SaveAs- oder SaveAs2-Methode.
Cancel Erforderlich Boolean False, wenn das Ereignis eintritt. Wenn die Ereignisprozedur dieses Argument auf True festlegt, wird das Dokument beim Beenden der Prozedur nicht gespeichert.

HinwBemerkungeneise

Weitere Informationen zur Verwendung von Ereignissen mit dem Application-Objekt finden Sie unter Verwenden von Ereignissen mit dem Application-Objekt.

Beispiel

This example prompts the user for a yes or no response before saving any document. Dieser Code muss in einem Klassenmodul platziert werden, und eine Instanz der -Klasse muss ordnungsgemäß initialisiert werden, damit dieses Beispiel funktioniert. Anweisungen dazu finden Sie unter Verwenden von Ereignissen mit dem Application-Objekt .

Public WithEvents appWord as Word.Application 
 
Private Sub appWord_DocumentBeforeSave _ 
 (ByVal Doc As Document, _ 
 SaveAsUI As Boolean, _ 
 Cancel As Boolean) 
 
 Dim intResponse As Integer 
 
 intResponse = MsgBox("Do you really want to " _ 
 & "save the document?", _ 
 vbYesNo) 
 
 If intResponse = vbNo Then Cancel = True 
End Sub

Siehe auch

Application-Objekt

AutoSave

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.