Wenn Zelle Datum dann Farbe über VBA
02.09.2016 13:10:42
VBA-Noob
ich habe ein kleines Problem und zwar will ich (eig. ganz simpel) wenn in der Spalte T das heutige Datum eingetragen ist, dass dieses Zelle Grün markiert wird.
Mein Code bisher:
Sub Farbe()
Dim Zelle As Range
Dim Bereich As Range
Dim Datum As Date
Set Bereich = Range("T1:T2000")
For Each Zelle In Bereich
Select Case Zelle.Value
!!!!! Case Datum: !!!!!!
Zelle.Interior.Color = 5296274
End Select
Next Zelle
End Sub
Die !!!! markieren ab wo ich ein Fehler mache. Ich bitte hier um HILFE!!
Danke im Voraus an jeden der hilft.
LG
VBA Noob