Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1448to1452
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
Inhaltsverzeichnis

Zeilen löschen

Zeilen löschen
21.09.2015 16:25:07
Norbert
Hallo Zusammen
für euch sicher ein Einfaches :)
in der beiliegenden Liste sollen alle Zeilen gelöscht werden, bei der die Zelle in der Spalte "Preis" leer ist. Es können bis zu 800 Zeilen aufgelistet sein. Wie sieht das Script aus, dass alle auf einmal gelöscht werden?
Danke im Voraus
https://www.herber.de/bbs/user/100302.xlsx

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

Betreff
Datum
Anwender
Anzeige
AW: Zeilen löschen
21.09.2015 16:30:59
matthias
Hallo Norbert,
Sub Bereinigen()
Dim x As Long
For x = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If Cells(x, 3) = "" Then Rows(x).Delete
Next x
End Sub
lg Matthias

AW: Zeilen löschen
21.09.2015 16:33:37
Daniel
HI
Beispielsweise so:
columns(3).SpecialCells(xlcelltypeblanks).EntireRow.Delete
Gruß Daniel

AW: Zeilen löschen
22.09.2015 00:27:41
Werner
Hallo Daniel,
wieder mal ein Einzeiler von dir -- klasse -- kann ich sicher auch mal gebrauchen.
Gruß Werner
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige