Application.NewDocument-Ereignis (Word)
Tritt ein, wenn ein neues Dokument erstellt wird.
Hinweis
Wenn Sie mit einem in ein anderes Dokument eingebetteten Dokument arbeiten, tritt dieses Ereignis nicht auf.
Syntax
Private Sub Application _NewDocument(ByVal Doc As Document)
Ausdruck Eine Variable, die ein Application-Objekt darstellt, das mit Ereignissen in einem Klassenmodul deklariert wurde.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| Doc | Erforderlich | Document | Das neue Dokument. |
Hinweise
Weitere Informationen zur Verwendung von Ereignissen mit dem Application-Objekt finden Sie unter Verwenden von Ereignissen mit dem Application-Objekt.
Beispiel
In diesem Beispiel wird der Benutzer gefragt, ob alle anderen geöffneten Dokumente gespeichert werden sollen, wenn ein neues Dokument erstellt wird. Dieser Code muss in einem Klassenmodul platziert werden, und ein instance 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_NewDocument(ByVal Doc As Document)
Dim intResponse As Integer
Dim strName As String
Dim docLoop As Document
intResponse = MsgBox("Save all other documents?", vbYesNo)
If intResponse = vbYes Then
strName = ActiveDocument.Name
For Each docLoop In Documents
With docLoop
If .Name <> strName Then
.Save
End If
End With
Next docLoop
End If
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.