ChatGPT-Thema: Excel zeitgesteuert beenden

Erstelle mir eine VBA-Lösung für folgende Aufgabenstellung: Täglich um 19:00 Uhr sollen alle Excel-Arbeitsmappen gespeichert und Excel beendet werden.

Hier ist ein Beispiel für eine VBA-Lösung, die Ihre Anforderungen erfüllt:
Öffnen Sie die Entwickler-Registerkarte in Excel und wählen Sie "Visual Basic".
Klicken Sie in der Projektmappen-Ansicht auf "Microsoft Excel-Objekte" und dann doppelt auf "ThisWorkbook", um die Code-Editor-Ansicht zu öffnen.
Fügen Sie den folgenden Code in den Editor ein:

Private Sub Workbook_Open()

    Application.OnTime TimeValue("19:00:00"), "SaveAndClose"

End Sub



Sub SaveAndClose()

    Dim wb As Workbook

    For Each wb In Application.Workbooks

        wb.Save

    Next

    Application.Quit

End Sub

Speichern Sie die Arbeitsmappe und schließen Sie Excel.
Beim nächsten Öffnen der Arbeitsmappe wird die Macro automatisch ausgeführt und täglich um 19:00 Uhr werden alle geöffneten Arbeitsmappen gespeichert und Excel beendet.
Beachten Sie bitte, dass dieser Code auf bestimmten Sicherheitseinstellungen der Office-Installation blockiert werden kann, geben Sie bitte entsprechende Berechtigungen.