möchte gern ab Beginn eines Blattes jede zweite Zeile löschen. Frage: mit Zähler oder gibts was besseres, wenn ja was.
Vielen Dank im Voraus,
Andyyy
möchte gern ab Beginn eines Blattes jede zweite Zeile löschen. Frage: mit Zähler oder gibts was besseres, wenn ja was.
Vielen Dank im Voraus,
Andyyy
Trage in der nächsten freie Spalte 1 Zeile A und in Zeile 2 B ein, kopiere es bis zum Ende der Daten, lege einen Filter drüber, filtere B, markiere alle sichtbaren Zeilen und lösche diese, Filter rausnehme und nun steht nur noch
die erste ursprüngliche Zeile
vom Grundsatz macht man Löschen von hinten nach vorne ist einfacher.
Am schnellten geht es falls eine Spalte komplett gefüllt ist. In diesem Fall Eine For Next Schleife mit Schrittweit 2 und nur den Inhalt der Zelle löschen und dann zum Schluß alle Zeilen löschen die in dieser Spalte leer sind. So wie sich das liest wolltest Du ja nur ein Ansatz.
Gruß Hajo
Der Code wurde getestet unter Betriebssystem XP Pro und Excel Version XP SBE.
Bitte kein Mail, Probleme sollen im Forum gelöst werden.
Microsoft MVP für Excel
hier eine Alternative ohne Schleife:
Gruß
Martin Beck
naja Ansatz mit Code wäre auch nicht schlecht...zumindest für die schleife...
grüße, sebastian
mein Problem ist viel leichter. Ich muss einfach jede Zeile löschen, die in A keinen Wert hat.
Hatr jemand da nen Source zu?
Danke, Andy
For z = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
If Cells(z, 1).Value = 0 Then Rows(z).Delete
Next z
bei großen Tabellen ist
erheblich schneller.
Gruß
Martin Beck