Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
836to840
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
836to840
836to840
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zeilen löschen nach Zellwert

Zeilen löschen nach Zellwert
17.01.2007 16:11:15
detleffranz
Hallo zusammen,
ich habe in meinem Excel-Sheet in Spalte B, Zeitwerte z.B.
14:32:00
14:33:00
14:34:00
14:35:00
14:36:00
14:37:00
14:38:00
14:39:00
ich möchte nun die gesamten Zeilen mit 14:32, 14:33, 14:14 löschen, sodaß ich nur noch 5 Minuten Werte habe (14:30, 14:35, 14:40). Da in meinem Sheet ca. 3000 Zeilen sind, ist das löschen von Hand sehr Aufwendig. Kann ich auch durch VBA löschen? Hat jemand eine Idee ?
Gruß Detlef

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen löschen nach Zellwert
17.01.2007 16:22:45
ChrisL
Hallo und Gruss
Chris

Sub t()
Dim iZeile As Long
Const iSpalte = 1 ' Spalte 1 entspricht Spalte A
For iZeile = Cells(65536, iSpalte).End(xlUp).Row To 1 Step -1
If Minute(Cells(iZeile, iSpalte)) Mod 5 <> 0 Then _
Rows(iZeile).EntireRow.Delete
Next iZeile
End Sub

AW: Zeilen löschen nach Zellwert
17.01.2007 17:16:12
Thorsten_Z
Hallo Detlef,
Wenn es ohne VBA sein soll, könntest auch z.B. in B1 14:00 und B2 14:05 schreiben, beide Zellen makieren und dann runter kopieren.
gruss Thorsten
AW: Zeilen löschen nach Zellwert
18.01.2007 07:23:42
detleffranz
Super! Funktioniert.
Besten Dank.
Gruß Detlef
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige