Dim lWert As Long, lZeileMax As Long
With wks
'Altdaten löschen
lZeileMax = Application.WorksheetFunction.Max(lZeile, _
.Cells(.Rows.Count, iSpalte).End(xlUp).Row, _
.Cells(.Rows.Count, iSpalte + 1).End(xlUp).Row)
.Range(.Cells(lZeile, iSpalte), .Cells(lZeileMax, iSpalte + 1)).ClearContents
Hallo Excel Spezialisten,
leider sollte nur ein Bereich immer wieder gelöscht werden B10 bis E14. Kann mir jemand sagen was hier verändert werden soll?
Jetzt wird alles darunterstehende gelöscht das ist nicht gut.
´Danke für eure Aufmerksamkeit.