Macro to move rows once complete

Hello,

I am creating an activity tracker that once a task is complete moves to a separate list
I've tried different codes i have found on here but none of them seem to work,

Can someone help me please?

Thanks

Hello,

Thank you for the code,

It doesn't appear to be moving the completed rows and just deleting the row out of the workbook, what would i add / change to make that happen?

Thank you that worked