In einer Zeile abhängig von Uhrzeit nach T oder N

Sub in der Spalte A4: A40 den Tag Now, mache die Zelle rot.(klappt)
Jetzt müsste ich abhängig von der Uhrzeit ab (06:00) in der gefundenen Zeile von C bis F suchen ob der Text "T" drinsteht.
Oder ab 18:00 in der Zeile von C bis F suchen ob der Text "N" drinsteht.
Das gefundene muss dann selectiert werden.
Public 

Sub Wasistheute()
Dim Zelle As Object
For Each Zelle In Range("A32:A40")       ' zum Testen auf A 40 begrenzt, sonst bis A 5000
Zelle.Select
If Zelle >= Now - 1 Then '
Zelle.Interior.ColorIndex = 3    'markiert den heutigen Tag Zelle rot
Exit Sub
End If
Next
End Sub


Schönen Dank im Voraus

Egon