Create Macro to link to Command Button and move information from one sheet to another

I am trying to create a Macro that links to a Command Button in Excel. I used this code because I want to transfer information from one sheet to another while deleting the cell from the the first sheet. Lastly, creating a command button with a Macro would make this process easier because I want to be able to click that button and have the documents that are marked as "Archieved" move over automatically to the second sheet and delete the cell from the first sheet. When I tried using this code, I was unable to get a result at all. Nothing would happen. I am wondering if my code is incorrect or if I messed up some of the ranges.

Private Sub CommandButton1_Click()
Dim ClientName As String, Diagnosis As String
Worksheets("sheet1").Select
ClientName = Range("J3")
Diagnosis = Range("K3")
Worksheets("sheet2").Select
Worksheets("sheet2").Range("A1").Select
If Worksheets("sheet2").Range("J3").Offset(1, 0) <> "" Then
Worksheets("sheet7").Range("J3").End(xlDown).Select
End If
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = ClientName
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Diagnosis
Worksheets("sheet1").Select
Worksheets("sheet1").Range("A2:B2").ClearContents
End Sub

Welcome to the forum! Please take a moment to re-read forum rule #1 and then amend your thread title to something that better explains your problem. Changing your thread title is not optional, which means you must change it. Thanks! After reading rule #1, then look at rule #3 regarding code tags. These are important rules that need to be addressed. Please amend your post and comply with our rules in the future.

Use concise, accurate thread titles.
Your post title should describe your problem, not your anticipated solution.
Use terms appropriate to a Google search - poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice tell us nothing.
Responding to a request to change your thread title by doing so is mandatory.

To change a title go to your first post, click EDIT then Go Advanced and change your title.

No help to be offered, please, until the OP complies with this request.

When you have changed the title, please also give full details of the problem in the body of your post - nobody should have to open an attachment to find out what you want.

I just changed it, hope this complies to the forum rules.

Mod Comment: And I have added Code Tags for you. Please use them in the future also as indicated in my post above.