ich hab eine mitlaufende Uhr in meiner Datei, die auch super funktioniert. Das Einzige was nervt ist dass der Cursor jetzt jede Sekunde blinkt wenn die Uhrzeit aktuallisiert wird. Kann man dieses Blinken abstellen?
Sub Refresh_StatusBar()
'rekrusiver Aufruf
Application.OnTime Now + TimeValue("00:01:00"), "Refresh_StatusBar"
'mit TimeValue("hh:mm:00") wird die Aktuallisierungsrate beeinflußt
msg = CStr(Now)
msg = "Datum und Urzeit: " + Left(msg, Len(msg) - 3) 'Sekundenanzeige unterdrücken
Application.StatusBar = msg
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen