Help with Copy entire row and paste to new sheet

Hello i have this code that copies an entire row and pastes it to a new sheet however it gets pasted to the top which is fine but it deletes my existing data
The code will take column "L" and if the word "Complete" is selected within my drop down it moves it into the "Competed" tab.

how can i get it to insert without overriding or insert into a blank row ?

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 12 Then
If Target.Value = "Complete" Then
Target.EntireRow.Copy Worksheets("Completed").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
Target.EntireRow.ClearContents


End If
End If

End Sub

thanks for the reply

I tried the attached code however it is still doing the same thing , it is overriding my existing data on worksheets("Complete")

You may not have data in column A, try this one

Please Login or Register  to view this content.