ich lasse einmal pro Woche ein Makro laufen, dass mir zuerst die Anzahl der Zellen mit dem heutigen Datum in einer Spalte anzeigt, und anschliessend alle anderen Zeilen loescht.
Leider scheint das Zaehlen nicht in allen Tabellenblaettern zu funktioníeren.
If Cells(I, 17) = Date Then N = N + 1
(Findet auf einigen Blaettern nicht alle Zellen)
If ActiveCell.Value <> Date Then ActiveCell.EntireRow.Delete
(Funktioniert auf allen Blaettern)
Hat jemand vielleicht eine Idee, woran das liegen kann? Alle Blaetter sind gleich aufgebaut und unterscheiden sich nur in der Menge der Zeilen.
Gruss
Christian