OnTime
30.09.2003 10:47:30
Rafael
manchmal .... ja manchmal scheint man einfach Tomaten auf den Augen zu haben. Bei unten stehendem Code erhalte ich immer die Fehlermeldung:
"Funktion oder Variable erwartet."
Die Code-Beschreibungen in meinen Büchern, bzw. der EXCEL-Hilfe unterscheiden sich auch nicht gross von dem was ich hier stehen habe. Die Vorschläge des Forums (da auch flexibler anwendbar) konnte ich nicht immer in allen Schritten nachvollziehen. Und für meine Ansprüche würde es vollkommen reichen, um 17:00 Uhr aus dem Büro gehen zu können und um 21:00 Uhr soll dann das aktive EXCEL-Sheet gespeichert und geschlossen werden.
Im voraus vielen Dank für Eure Mühe!
Rafael
Private Sub AutoClose()
On Error Resume Next
Application.OnTime TimeValue("19:00:00"), "SaveNClose"
End Sub
-----------------------------------------------------------------------------
Sub SaveNClose()
ThisWorkbook.Save
ThisWorkbook.Close
Application.Quit
End Sub
Anzeige