My Action Tracker Keeps placing my competed action rows on sheet2 in the same place.

Here is my code. Column 6 is where i am typing completed; however, everytime i do type completed the row goes to the exact same location on sheet 2 (named completed). If anyone can help, I would greatly appreciate it.



Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng1 As Range
Dim rng2 As Range
Set rng1 = Target.EntireRow
Set rng2 = Worksheets("Completed").Cells(Rows.Count, 1).End(xlUp) _
.Offset(1, 0)
If Target.Column = 6 Then
On Error GoTo endit
Application.EnableEvents = False
If Target.Value = "completed" Then
With rng1
.Copy Destination:=rng2
.Delete
End With
End If
End If
endit:
Application.EnableEvents = True
End Sub