Zellen Löschen wenn

Bild

Betrifft: Zellen Löschen wenn
von: M. Gottschalk
Geschrieben am: 23.02.2005 16:52:51
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

Bild

Betrifft: AW: Zellen Löschen wenn
von: harry
Geschrieben am: 23.02.2005 16:56:21
hi,
versuch mal
If CStr(Cells(i, 5).Value) = "A" Then
liebe grüße,
harry
Bild

Betrifft: AW: Zellen Löschen wenn
von: M. Gottschalk
Geschrieben am: 23.02.2005 17:05:48
Danke!
Aber ich hab den Fehler schon gefunden!!!
Gruß M.Gottschalk
Bild

Betrifft: Du bist wie der vom Fernsehen
von: Werner Oertli
Geschrieben am: 23.02.2005 17:10:29
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
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zellen Löschen wenn"