Auto_close & Application.OnTime?
29.01.2005 00:44:40
Michael G.
ich versuche eine zeitgesteuerte Prozedur beim Schließen einer Excel-Datei automatisch zu beenden. Es gibt dabei allerdings den Laufzeitfehler 1004. Weiß jemand einen Rat?
Public Sub Zeitsteuerung_ein()
Application.OnTime TimeValue("12:00:00"), "Mittagspause"
End Sub
Public Sub Zeitsteuerung_aus()
Application.OnTime TimeValue("12:00:00"), "Mittagspause", , False
End Sub
Public Sub Mittagspause()
MsgBox "Der Gesundheitsminister empfiehlt Ihnen eine Mittagspause"
End Sub
Sub Auto_close()
Zeitsteuerung_aus
End Sub
Danke & Ciao,
Michael G.