Delete a row based on user selection

Hi Dave you are right it would be slightly faster to go from bottom to top.

Private Sub Worksheet_Change(ByVal Target As Range)
    For i = 19 To 2 step -1
    If LCase(Range("M" & i)) = "reject it" Then
    Rows(i).EntireRow.Delete
    End If
Next
End Sub