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

Wenn Leerzelle, dann Zeile löschen

Forumthread: Wenn Leerzelle, dann Zeile löschen

Wenn Leerzelle, dann Zeile löschen
18.09.2006 08:20:07
Tom8
Hallo,
habe in Spalte B von Zeile 7 bis 50 etwas stehen, oder auch nicht. In den Zellen (B7:B50), welche leer sind, soll nach Buttonklick, die komplette Zeile gelöscht werden.
Danke im voraus
Tom
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Leerzelle, dann Zeile löschen
18.09.2006 08:23:10
Matthias
Hallo Tom,
so:

Sub LeerzeileLöschen()
Dim z As Long
For z = 50 To 7 Step -1
If Cells(z, 2) = "" Then Rows(z).Delete Shift:=xlUp
Next z
End Sub

GRuß Matthias
AW: Wenn Leerzelle, dann Zeile löschen
18.09.2006 18:24:24
Tom8
Vielen Dank
Gruss Tom
AW: Wenn Leerzelle, dann Zeile löschen
18.09.2006 08:25:16
Josef
Hallo Tom!
Z.B. so.
Sub Leerzeilen()

On Error Resume Next
Range("B7:B50").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
On Error GoTo 0

End Sub


Gruß Sepp

Anzeige
AW: Wenn Leerzelle, dann Zeile löschen
18.09.2006 18:26:15
Tom8
Vielen Dank
Gruss Tom
;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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