Hallo !

Ich habe ein kleines Problem mit der TimeSerial-Funktion

Hier ist mein Code:
NeueStunde = Hour(Now())
NeueMinute = Minute(Now())
NeueSekunde = Second(Now()) + 1
Wartezeit = TimeSerial(NeueStunde, NeueMinute, NeueSekunde)
Application.Wait Wartezeit

Dieser Code bewirkt, dass die Ausführung des Makros für eine Sekunde angehalten wird. Ich möchte aber eine kleine Zeiteinheit erwirken. Leider funktioniert es nicht, wenn ich statt die +1 durch +0.5 ersetze. Das Makro stoppt dann vollständig.

Hat jemand eine Idee !?!?!

Danke

Peter