Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Zelleninhalt vergleichen / Zeilen löschen

Zelleninhalt vergleichen / Zeilen löschen
11.05.2009 16:30:00
StefanS
Hallo zusammen,
nochmal ich:
Ich möchte die Zahl in der Zelle D4 auslesen und alle Zeilen unterhalb diesem Wert löschen.
Beispiel: Wert in Zelle D4 = 10. Somit sollen alle Zeilen unterhalb der Section 10 gelöscht werden.
https://www.herber.de/bbs/user/61748.xls
Wäre super, wenn mir jemand von Euch helfen könnte! Vielen Dank.
Gruß, Stefan

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zelleninhalt vergleichen / Zeilen löschen
11.05.2009 16:55:28
Daniel
Hi

Sub Löschen()
Dim rng As Range
Set rng = Columns(2).Find(what:=Range("D4").Value, lookat:=xlWhole, LookIn:=xlValues)
If rng Is Nothing Then
MsgBox "Wert konnte nicht gefunden werden."
Else
Range(rng.Offset(1, 0), rng.Offset(Rows.Count - rng.Row, 0)).EntireRow.Clear
End If
End Sub


Gruß, Daniel

AW: Zelleninhalt vergleichen / Zeilen löschen
12.05.2009 07:10:35
StefanS
Hallo Daniel,
so kann der Tag beginnen - echt super! Danke!
Gruß, Stefan
Anzeige

313 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige