Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
880to884
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
880to884
880to884
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen mit altem Datum löschen

Zellen mit altem Datum löschen
04.07.2007 10:20:00
Andreas
Hallo.
Ich hoffe Ihr könnt mir helfen.
In meiner Excel-Tabelle befinden sich in der Spalte B Zellen mit einem aktuellen Datum (grüne Hintergrundfarbe) und Zellen mit einem älteren Datum (graue Hintergrundfarbe)
Siehe: Userbild
Ich möchte per Makro erreichen das alle Zeilen die das ältere Datum haben [ also kleiner als =HEUTE() ] gelöscht werden. Oder anhand der grauen Hintergrundfarbe.
Könnt Ihr mir helfen?
Mit freundlichem Gruß
Andreas

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zellen mit altem Datum löschen
04.07.2007 14:39:00
Chaos
Servus,

Sub löschen()
Dim zeile As Integer
For zeile = 32 To 12 Step -1
If Cells(zeile, 2).Interior.ColorIndex = 15 Then
Cells(zeile, 2).EntireRow.Delete
End if
Next zeile
End Sub


das löscht die ganzen zeilen raus, die grau hinterlegt sind.
gruß
chaos

AW: Zellen mit altem Datum löschen
04.07.2007 14:49:02
Sven
Hi,
und so gehts anhand vom Datum ;)

Sub alte_löschen()
Dim i
For i = [B12].End(xlDown).Row To 12 Step -1
If Cells(i, 2).Value 


AW: Zellen mit altem Datum löschen
04.07.2007 14:51:00
Andreas
Danke, hat geklappt. ;o)
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige