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"