JackDaniels
Lt. Junior Grade
- Registriert
- Jan. 2002
- Beiträge
- 385
Hallo,
will ein makro für excel schreiben, dass mir jede 2. zeile komplett löscht.
krieg das aber net ganz hin, kann mir jemand helfen?
sind halt 50000 zeilen in dem excel sheet und will mir arbeit ersparen
hintergrund ist der, dass aus den 50000 zeilen ein diagramm erstellt werden soll, excel mault aber rum dass es nur 32000 verwalten kann.
deshalb jede 2. zeile löschen, reicht für diagramm aus...
bisher siehts so aus, funzt aber net ganz :/ also ab zeile 3 bis 49985 soll jede 2. gelöscht werden.
For i = 2 To 49985
Rows("(1+i)
1+i)").Select
Selection.Delete Shift:=xlUp
Next i
End
danke mal,
will ein makro für excel schreiben, dass mir jede 2. zeile komplett löscht.
krieg das aber net ganz hin, kann mir jemand helfen?
sind halt 50000 zeilen in dem excel sheet und will mir arbeit ersparen

hintergrund ist der, dass aus den 50000 zeilen ein diagramm erstellt werden soll, excel mault aber rum dass es nur 32000 verwalten kann.
deshalb jede 2. zeile löschen, reicht für diagramm aus...
bisher siehts so aus, funzt aber net ganz :/ also ab zeile 3 bis 49985 soll jede 2. gelöscht werden.
For i = 2 To 49985
Rows("(1+i)

Selection.Delete Shift:=xlUp
Next i
End
danke mal,