Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
572to576
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
572to576
572to576
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Zellen Löschen wenn

Zellen Löschen wenn
23.02.2005 16:52:51
M.
Hallo,
ich habe ein Makro das leider nicht funktioniert
dies soll alle Zeilen löschen in deren Spalte E ein "A" steht.
komisch ist nur das wenn ich es mit Zahlen probier, dann geht es.
was mach ich falsch?

Sub löschen()
For i = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
On Error Resume Next
If Cells(i, 5).Value = "A" Then
Rows(i).Delete
End If
Next
End Sub

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

Betreff
Datum
Anwender
Anzeige
AW: Zellen Löschen wenn
harry
hi,
versuch mal
If CStr(Cells(i, 5).Value) = "A" Then
liebe grüße,
harry
AW: Zellen Löschen wenn
M.
Danke!
Aber ich hab den Fehler schon gefunden!!!
Gruß M.Gottschalk
Du bist wie der vom Fernsehen
23.02.2005 17:10:29
Werner
Hallo M
Es ist ja schon recht, wenn Du den Fehler gefunden hast.
Aber andere Gwundrige Mitleser interessiert es nun mal, wo der Fehler gelegen hat.
Gruss Werner
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige