I think the problem you're having is the "type" of button you are using. Use a button from the Control Toolbar. Then, doubleclick on it, and paste this macro there:
Private Sub CommandButton1_Click()
ActiveCell.Select
CommandButton1.BottomRightCell.Offset(1).EntireRow.Insert
End Sub