Zeile löschen

Forumthread: Zeile löschen

Zeile löschen

15.05.2002 13:52:43

Stephan

Hallo zusammen,

Ich möchte in einer for-next-Schleife eine bestimmte Zeile löschen, in der eine Zelle einen bestimmten Wert hat.
Sieht ungefähr so aus:

for i = 1 to 100
if cells(i, 2) = "0" then
' jetzt möchte ich die Zeile i löschen
end if
next i

Wie geht das?

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Re: Zeile löschen

15.05.2002 14:04:05

Steph@n
Re: Zeile löschen

15.05.2002 17:18:02

Martin Beck

Re: Zeile löschen

15.05.2002 14:04:05

Steph@n

Hallo Stephan,

probiers mal so:

for i = 1 to 100
if cells(i, 2) = "0" then

Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp

end if
next i

Gruss Stephan

Re: Zeile löschen

15.05.2002 17:18:02

Martin Beck

Hallo Stephan(s),

wenn Zeilen per Schleife gelöscht werden sollen, sollte man unbedingt von unten nach oben arbeiten. Wenn hier z.B. mehrere Zeilen in der 2. Spalte 0 stehen haben, werden durch Stephans Code nicht alle Zeilen gelöscht. Verwende

Je nachdem, auf was Du prüfst, müssen die Hochkommata in "0" noch gelöscht werden.

Gruß
Martin Beck

Forumthread: Zeile löschen

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

2
Beiträge zum Forumthread

Beiträge zu diesem Forumthread