Jede 2. zeile löschen

Bild

Betrifft: Jede 2. zeile löschen
von: Stefan Glander
Geschrieben am: 20.03.2005 17:08:48
Moin Moin Excelanier,
ich habe mal wieder ein Problem wo ich Euren Rat bräuchte.
ich habe jede menge zeilen mit Daten. Die Daten beziehe ichaus einem Logfile.
Leider sind die Daten in Zeile 1 + 2, und 3 + 4 , etc.... bis unendlich fast identisch.
wie kann ich nun, ohne jede zweite Zeile von hand zu editieren und löschen dieses problem automatisieren.
Im voraus vielen Dank
Stefan

Bild

Betrifft: AW: Jede 2. zeile löschen
von: Ramses
Geschrieben am: 20.03.2005 18:37:42
Hallo
Probier mal:
Sub Del2Row()
Dim i as long
For i = Range("A65536").End(Xlup).Row to 2 step - 2
Rows(i).Delete
Next i
Gruss Rainer
Bild

Betrifft: AW: Jede 2. zeile löschen
von: Stefan Glander
Geschrieben am: 20.03.2005 18:38:44
Danke dir.
Gruss
stefan
Bild

Betrifft: erledigt, Danke
von: Stefan Glander
Geschrieben am: 20.03.2005 18:37:48
.
 Bild

Beiträge aus den Excel-Beispielen zum Thema "erster, zweiter und dritter"