Moin,
ich möchte in Exel nur jede fünfte Zeile behalten und alles andere löschen. Ich habe noch nie was mit Exel gemacht und habe daher keinen Schimmer wie das geht. Habt ihr einen? *g*
Sub ASDF()
Set TB = Worksheets(1)
lzeile = TB.Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lzeile Step 1
Rows(i).Delete
Rows(i).Delete
Rows(i).Delete
Rows(i).Delete
Next i
End Sub