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

Löschen einer Zeile

Forumthread: Löschen einer Zeile

Löschen einer Zeile
19.02.2004 15:49:41
Frank
Hallo zusammen,
ich habe längere Dateien in denen vereinzelt in Zeilen Werte stehen.
Zur Auswertung dieser Zellen (mit Werten)sollen die ohne Werte gelöscht
werden ohne jede Zeile einzeln zu markieren und dann zu löschen..
Gruß
Frank
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Löschen einer Zeile
19.02.2004 15:53:07
K.Rola
Hallo,

Sub Leere_löschen()
Dim x As Long, lz As Long
lz = 65536: If [A65536] = "" Then lz = [A65536].End(xlUp).Row
For x = lz To 1 Step -1
If Application.CountA(Rows(x)) = 0 Then
Rows(x).Delete
End If
Next
End Sub

Gruß K.Rola
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige