Hallo,
Ja da gibt es eine Möglichkeit. Leider weiß ich nicht, wie deine Tabelle aufgebaut ist. Angenommen du hast in Spalte A die Datumsangaben aufsteigend sortiert stehen und möchtest nun Alle Zeilen mit Datum < Heute-3 Tage löschen, könnte man z.B. das folgende Makro verwenden:
Öffne den VBA-Editor (mit Alt+F11), klicke auf der linken Seite doppelt "DieseArbeitsmappe" und gib dort diesen Code ein.
Private Sub Workbook_Open()
Blatt = "Tabelle1"
ErstesDatum = "A2" 'Datum der ersten Raumbelegung im Blatt (damit nicht die Überschrift gelöscht wird)
zei = Range(ErstesDatum).Row
spa = Range(ErstesDatum).Column
Do
zei = zei + 1
Loop Until Cells(zei + 1, spa).Value >= Date - 3 Or zei > Cells(Rows.Count, spa).End(xlUp).Row
Range(Range(ErstesDatum), Cells(zei, spa)).EntireRow.Delete
End Sub
Den Namen deines Arbeitsblatts musst du natürlich anpassen.
Falls du Excel 2007 oder höher verwendest, musst du dann noch die Datei über Speichern unter als xlsm speichern, damit das Makro funktioniert.
Gruß Mr. K.