Inhaltsverzeichnis
Speichern der Arbeitsmappe erzwingen - Workbook_BeforeClose
Ich würde nicht empfehlen, dies zu verwenden, aber zum Experimentieren und als Demonstration von ActiveWorkbook.Save:
Mit dem folgenden Code können Sie eine Arbeitsmappe speichern, ohne dem Benutzer die Option „Ja/Nein“ zu geben:
Platzieren Sie dies im Modul DieseArbeitsmappe…
| 1234567891011121314 | Private Sub Workbook_BeforeClose(Cancel As Boolean)Wenn gespeichert = Falsch DannActiveWorkbook.SpeichernEnde WennEnd Sub |
Dies funktioniert nicht für mehrere Arbeitsmappen. Damit es mit mehreren Arbeitsmappen funktioniert, müssen Sie den Code in die Datei personal.xls einfügen oder alle geöffneten Arbeitsmappen durchlaufen lassen.
