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

Zeilen löschen

Forumthread: Zeilen löschen

Zeilen löschen
DieterG
Hallo zusammen,
brauche mal wieder Euere Hilfe!
Ich habe z.B. von: "C9:C20" einen Bereichsnamen vergeben. Jetzt möchte ich, wenn sich in diesen Bereich eine oder mehrere Leere Zellen befinden die komplette Zeile bzw. Zeilen mit den leeren Zellen per Makro löschen.
Danke schon mal im Vorraus
Freundliche Grüße
Dieter
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Zeilen löschen
11.08.2011 11:50:41
Tino
Hallo,
für so wenige Zellen sollte dies ausreichen.

Sub Beispiel()
Dim n&
Application.ScreenUpdating = False
'evtl. Tabelle anpassen
With Sheets("Tabelle1").Range("Bereichsnamen")
For n = .Rows.Count To 1 Step -1
If .Cells(n, 1) = "" Then
.Cells(n, 1).EntireRow.Delete
End If
Next n
End With
Application.ScreenUpdating = True
End Sub
Beachte je nachdem wie Du den Namen für diesen Bereich vergeben hast,
dass sich dieser Bereich ändern kann.
Sollte dies nicht gewollt sein, evtl. den Bereich mittels =Indirekt() festlegen.
Gruß Tino
Anzeige
AW: Zeilen löschen
11.08.2011 12:26:50
DieterG
Hallo Tino,
genau so habe ich mir das vorgestellt!
Danke nochmal
Gruß
Dieter
;

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