Hallo an alle,
ich habe eine Tabelle als Tabelle formatiert (Start-->Als Tabelle formatieren-->Form auswählen).
Wenn ich jetzt z.B. die letzen 5 Zeilen dieser Tabelle lösche, muss ich manuell die Tabelle anpassen, d.h. die gelöschten Zeilen aus der Tabelle entfenen. Das mache ich wie folgt: Zeilen markieren, die gelöscht wurden -->rechte Maustaste-->Zeile/Spalte löschen-->Tebellzeile.
Hat jemand eine Idee, wie ich diesen Löschvorgang über ein Makro machen kann?
Ich habe es so versucht, hat aber nicht geklappt:
Sub loeschen()
Sheets("Eingabe").Select
Cells(65000, 15).End(xlUp).Offset(1, 0).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.ListObject.ListRows(10).Delete
Range("O2").Select
End Sub
Vielen Dank
|