Jede 2. zeile löschen, wie ?

hallo excel-experten,
ich möchte in einem excel dokument jede zweite zeile löschen,
wie macht man das am einfachsten ?
vielen dank !

Hallo,

du programmierst dir ein kleines VBA-Makro, z.B. so:

Sub JedeZweiteZeileLoeschen()

Application.ScreenUpdating = False

For l& = 65536 To 2 Step -2
Rows(l & „:“ & l).Select
Selection.Delete Shift:=xlUp
Next l

Application.ScreenUpdating = True

End Sub

Gruß, Bernd

hallo excel-experten,
ich möchte in einem excel dokument jede zweite zeile löschen,
wie macht man das am einfachsten ?
vielen dank !