In einer Listbox Spalte stehen unterschiedliche Uhrzeiten. ich moechte das immer die Zeile mit aktueller Uhrzeit plus eine Std. ausgewaehlt wird. das bekomm ich hin mit:
With ListBox3
For i = 0 To .ListCount
If Hour(.List(i, 2)) = Int(Hour(Time) + 1) Then
.ListIndex = i
Exit For
End If
Next
End With
Problem ist nur das nicht alle Std. vorhanden sind. Bsp. 14:45 15:01 16:21
Wenn die Jetztzeit 12:00 Uhr ist, laeuft es ja auf einen Fehler.
Wie kann ich diesen abfangen bzw. ein anderer Code der zur naechsten Uhrzeit spring.
Bin auf keinen gruenen Zweig gekommen. :-(
gruss hary