Office: (Office 2016) automatisches Speichern von Word Dateien beim Schließen

gerne würde ich meine WORD 2016 Datei automatisch abspeichern beim Schließen, ohne
den Antrag "Möchten sie ihre Änderungen an.." angezeigt wird.

Leider habe ich jetzt mehrer Makros vorgenommen ohne Erfolg!

vill. kann mir jemand Hilfestellung geben, wäre top zufrieden, wenn´s ich hinkriegen würde!


Gruss

 

Hallo ,

das kommt in das Modul ThisDocument deiner normal.dotm und gilt dann für jedes Dokument. Bei neuen ungespeicherten Dokumenten erscheint wie gewohnt der Speichern-Unter-Dialog. Nach Einbringen des Makros einmalig im VBA-Editor speichern, sonst kriegst du eine Nachfrage ob die Normal.dotm gespeichert werden soll.

Code:

Private WithEvents App As Word.Application

Private Sub Document_Open()
   If App Is Nothing Then
        Set App = ThisDocument.Application
    End If
End Sub

Private Sub Document_New()
   If App Is Nothing Then
        Set App = ThisDocument.Application
    End If
End Sub


Private Sub App_DocumentBeforeClose(ByVal doc As Document, Cancel As Boolean)
doc.Save
End Sub