To do that:
- right-click 1 of your sheets tab
- click on "Select all sheets"
- right-click 1 of your sheets tab again
- click on "Move or copy ..."
- check the "make copy" box and click OK.
When you want to link these actions to a button, start recording a macro and take the above steps, then stop recording. Now you can "Call" the macro in the button script.
Private Sub CommandButton1_Click()