copy selected row and paste it to another sheet command button vba

Hi ,
I am trying simple macro.
I have sheet1 with column 1,2, & 3.
Sheet2 is identical.

There is a command button on sheet1.

If I select in sheet1 ( A) column any row and press command button then selected row is deleted from sheet1.
Pasted to sheet2 in next available row.
And sheet1 rows shift up.

Any suggestions and help please.
Kind regards