Moving completed items from one table to another (on another sheet)

[doctorevii2001]

I have a fairly simple workbook that I track my tasks. What I am trying to do is connect a macro to a button that will take all items that are completed in one table to another table on a second page. Here is the construction of the workbook and tables:

Sheet: Task List

	A	B	C	D	E	F
1	Done	Item	Date Added	Due Date	Date Completed	Type
2		Follow up on formula	12/6/16	12/8/16		Task
3	x	Ask Question	12/6/16	12/7/16	12/7/16	Task
4

<tbody>
</tbody>

Sheet: Done

(table is identical to that on Task List)

More Details:
I have a macro button set up to insert a new line at the top of my table (for adding tasks and not having them go to the bottom)
I have formulas set up so when I enter something in the Item column the Date Added autopopulates. Similarly when I put an "x" in the Done column it autopopulates Date Completed.

Goal:
When I click to insert a new line in my "Task List" sheet I would like it to cut all rows that have an x in column Done (A) and paste it in my table on sheet "Done."

If it helps, the current (super basic) VBA I have on the Insert New button is:

Sub Button4_Click()
Sub AddARow()
    Rows("2:2").Insert Shift:=xlDown
End Sub

I have gotten bits and pieces of what I'm going for to work, but when I try to pull it all together it fails royally and I can't seem to isolate the problem. I appreciate any help you might be able to offer!

(I'm moderately new to VBA, so I get the basics, but feel free to talk "dumb" to me, I appreciate the learning and guidance!)