Mit untenstehenden Code gibt´s zwei Probleme:
1.) Aktivität aus Userformen werden nicht berücksichtigt.
2.) Bei dieser Art des Schließens wird zwar geschlossen, aber nicht gespeichert
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:30:00"), "Shutdown"
End Sub
Im Modul:Sub Shutdown()
ThisWorkbook.Close savechanges:=True
End Sub Hat vielleicht wer eine Lösung?
Grüße
Lorenz