Ich steh grad total aufm Schlauch
02.11.2012 12:51:15
Maximilian
Ich habe eine Tabelle mit einer Spalte Datum nach der auch sortiert wird.
Es kommen also erst alle mit 25.10.2012 dann 26.10.2012 usw.
Ich möchte nun immer die Datumsblöcke abwechselnd per VBA einfärben.
Ich habe nur leider keine Idee, wie ich so einen Block erfassen kann.
Habe eine Schleife, die die Einträge durchgeht, aber wie prüfe ich, ob der aktuelle Block, in dem ich gerade bin, sich farbig oder nicht farbig gehört.
Das habe ich bisher zusammengestöbselt, gibt sicher eine einfache Lösung
Dim M As Boolean
M = True
For i = 4 To Sheets(1).UsedRange.Rows.Count
If CDate(Cells(i, 5).Value) >= CDate(Cells(i - 1, 5).Value) Then
If M Then M = False
Else: M = True
End If
If M Then Mark (i)
Next