Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Fehler 1004 bei Ontime

Betrifft: Fehler 1004 bei Ontime von: Mathias
Geschrieben am: 11.06.2008 04:23:37

Hallo,

folgender Code funktioniert zwar wie er soll, liefert aber trotzdem einen Fehlercode "1004".

Ich frage mich nur, warum???

Option Explicit
Option Private Module

Dim DaEt As Date ' Zeitpunkt zum prüfen
Const DaZeit As Date = "00:00:01" ' Zeitabstand prüfen


Sub Schliessen()

' [...]

End Sub




Sub startzeit()

On Error Resume Next
 
Application.OnTime EarliestTime:=DaEt, Procedure:="Schliessen", Schedule:=False
DaEt = Now + DaZeit
Application.OnTime DaEt, "Schliessen"

MsgBox (Err & " " & Err.Description)

End Sub


  

Betrifft: ERLEDIGT: AW: Fehler 1004 bei Ontime von: Mathias
Geschrieben am: 11.06.2008 05:07:44

Hallo,

Problem hat sich schon erledigt.

Vielen Dank für die Aufmerksamkeit ;-)

Viele Grüße

Mathias


 

Beiträge aus den Excel-Beispielen zum Thema "Fehler 1004 bei Ontime"