Create a macro to copy data from one worksheet to another worksheet based on criteria met

I have a button that when selected an excel macro runs that if you have highlight a row in "DAILY CONTROL" worksheet this will cut this data and place it where the current selected cell position in "COMPLETED" worksheet.

Sub COMPLETED()
'
' COMPLETED Macro
' 

'
    Sheets("COMPLETED").Select
    ActiveSheet.Paste
    Sheets("DAILY CONTROL").Select
    Application.CutCopyMode = False
    Selection.Delete Shift:=x1up
    ActiveWindow.SmallScroll Down:=-3
    
End Sub

What I am trying to do is change the macro to automate this so that any row in DAILY CONTROL worksheet that has text = COMPLETED in column H will then copy the data from columns A:K to the next blank row in COMPLETED worksheet A:K.
I then go back into the DAILY CONTROL worksheet and clear the contents, except for columns D & H of these rows which have formula's that I don't want removed.
I have up to 1000 rows and wish to keep these formulas in place.