Hi,

ich komme aktuell nicht weiter bei meinem Problem:

Folgender Code klappt wunderbar für Datumsangaben. Es wird geprüft ob es sich um ein Datum handelt -falls ja - dann wird eine Aktion ausgeführt. Das selbe will ich nun für die Uhrzeit realisieren. In den Zellen steht eine entspreche Uhrzeit im Format 04:37:56 (also ohne Datum - nur Uhrzeit). 

Hier der Code für das Datum (IsDate):

Sub Werte()
Dim c As Excel.Range
For Each c In ActiveCell.CurrentRegion.Cells
    If IsDate(c) Then
       XXX
    End If
Next
End Sub

Ich habe schon nachgelesen das es keine entsprechende Funktion für die Zeit gibt (IsTime), sondern dies ebenfalls über die Datumsfunktion funktionert. Tut es in meinem Fall allerdings nicht. Jemand eine Idee? 

 Vielen Dank