vba Zeilen löschen ab #WERT!

  Dim intSpalte As Integer   ' Spalte aus der 1. leere Zelle von unten gesucht wird
Dim i As Long              ' Zeilennummer dieser Zelle
Dim j As Long              ' letzte Zeilennummer in der aktuellen Tabelle überhaupt
intSpalte = 12  ' letzte Zeile wird aus Spalte L bestimmt
i = IIf(Len(Cells(Rows.Count, intSpalte)), Rows.Count, Cells(Rows.Count, intSpalte).End(xlUp) _
.Row) + 1
j = Cells.SpecialCells(xlCellTypeLastCell).Row
If i