Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

von einer best. Zeile an die nächst. 20 Z. löschen

Forumthread: von einer best. Zeile an die nächst. 20 Z. löschen

von einer best. Zeile an die nächst. 20 Z. löschen
07.12.2006 22:56:18
einer
Guten Abend
Mit folgendem Code wähle ich in einer Tabelle in Spalte C die letzte benutzte Zeile an:
.Sheets(1).Range("C65536").End(xlUp).Select
Nun möchte ich die nächsten 20 Zeilen (jedoch nicht die angewählte selbst) löschen.
Kann mir jemand sagen, wie der Code lautet?
Vielen Dank.
Peter
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: von einer best. Zeile an die nächst. 20 Z. löschen
07.12.2006 23:19:28
einer
Hallo das könntest du so machen.

Sub neu()
Sheets(1).Range("C65536").End(xlUp).Select
Rows(Sheets(1).Range("C65536").End(xlUp).Row + 1 & ":" & Sheets(1).Range("C65536").End(xlUp).Row + 20).Delete Shift:=xlUp
End Sub

gruß Chris
AW: von einer best. Zeile an die nächst. 20 Z. löschen
07.12.2006 23:24:14
einer
Hallo Chris
Vielen Dank - genau das habe ich gesucht!
Peter
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige