Copy/Paste Macro

Please see the attached file for clarification:

Attachment 11707

This is a very abbreviated version of my actual worksheet. There are 100+ tasks (sections), and I would like to include a command button at the top with a macro that will insert a new task (or section) wherever the user wants in the worksheet (i.e., between 2 and 3, or between 3 and 4, etc).

Currently the code I have set up - which I copied and unsuccessfully modified from another source - is:

 Private Sub CommandButton1_Click()
    Range("B71:M77").Select
    Selection.Copy
    ActiveCell.Insert Shift:=xlDown
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = ""
End Sub

The problem I'm having is getting the macro to paste the template from below back up top, wherever the user has initially selected a cell.

Any help is greatly appreciated! Thanks.

Your download isn't working so I'm not completely sure what you are doing. Try this, enter the range that you are copying

  ActiveCell.Insert Shift:=xlDown
    Range("your formulas").Copy ActiveCell