Zeiten vergleichen

[tmessers]

Geschätztes Forum,
nach längerer Zeit habe ich ein Problem, dessen Lösung ich nicht finden kann.

Ich habe in der Beispieldatei die Reiter "Ankunft" und "PA". in "Ankunft" lasse ich mit VBA Flüge auswerten.
In "PA" möchte ich, dass aus "Ankunft" für jeden Tag die Zeiten ausgelesen und und in "PA" das entsprechende Feld rot markiert wird.
Dazu wird die Zeit aus "Ankunft" mit den Zeiten in einer Art Zeitstrahl in "PA" (Zeile 20) verglichen.
Ich habe eine Formellösung erstellt, die das erledigt aber statt der Rotmarkierung ein 2 einträgt. Wenn mein VBA Code richtig ist müsste jedes Feld, dass eine 2 enthält auch rot markiert sein. Dies soll mir zur Überprüfung des Codes dienen. Später soll nur die 2 erscheinen. Die Formellösung ist korrekt, der Code nicht wie man sehen kann. In "PA" werden auch Zellen markiert, die keine Zahl enthalten.
Bei "Abflug" und "PE" soll das oben beschriebene analog ablaufen. Dort ist die Rotmarkierung aber noch weiter daneben.

Ich finde den Fehler in meinem Code leider nicht.

Vielleicht findet jemand aus dem Forum den Fehler.

Gruß

Thomas

[lupo1]

Ich habe Deine Datei nicht geöffnet, da a) ich so große Teile nicht in Ordnung finde und b) man keine .xlsm verbreitet.

In Excel sollte man Zeiten nicht numerisch vergleichen, da es sich um Gleitkommazahlen handelt.

=VERGLEICH(TEXT(ZeitA;"hh:mm");INDEX(TEXT(ZeitenB;"hh:mm"););0) oder
=VERGLEICH(TEXT(ZeitA;"hh:mm");INDEX(TEXT(ZeitenB;"hh:mm"););1)

oder

=TEXT(ZeitA;"hh:mm")=TEXT(ZeitB;"hh:mm") (oder kleiner, größer, kleinergleich, größergleich)