Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: 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
Anzeige

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

Anzeige
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
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige