Hallo zusammen!
mit folgendem makro mochte ich einen bereich so formatieren das dir zellen in dem bereich (Datumswerte) markiert werden die drei tage vor ablauf des aktuellen datums ablaufen.
In "B2" steht das aktuelle DAtum
Dim Zeile As Long
Dim DatumEnde As Long
DatumEnde = Cells(2, 2).Value + 3
Range("E6:E400").Select
For Zeile = 1 To UsedRange
If DatumEnde >= Cells(Zeile).Value Then Cells(Zeile).Interior.ColorIndex = 5
Next Zeile
es läuft zwar durch ,markiert mir aber nicht die zellen.
Anmerkung: ich möchte es ohne die vorgegebene bedingte formatierung aus excel machen
vielen dank und viele grüße
steffen