Slette rækker i Excel...

Jeg har følgende macro i Excel, som skjuler udvalgte rækker. Det jeg nu skal bruge er en anden macro, som kan slette disse rækker istedet for at skjule dem...

    Dim i As Long
    For i = 15 To 65536
      If Cells(i, 20).Value = "Fejl" Then
        Cells(i, 20).Select
        ActiveCell.EntireRow.Hidden = True
      End If
    Next i

Har prøvet med ActiveCell.EntireRow.Delete = True men den sletter kun den første række og giver herefter fejl...