ich möchte eine Excel-Datei automatisch 15 Minuten nach dem sie geöffnet wurde wieder speichern und schließen lassen. Wie geht das?
Sub auto_open()
Dim Beenden
Application.OnTime Now + TimeValue("00:00:15"), "Beenden"
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Sub auto_open()
Application.OnTime Now + TimeValue("00:00:15"), "Beenden"
End Sub
Sub Beenden()
ActiveWorkbook.Save
ActiveWorkbook.Close
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen