View Single Post
 
Old 01-05-2017, 04:00 PM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
 
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 842
NoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of lightNoSparks is a glorious beacon of light
Default

Your line of thought is off.
You don't copy an entire sheet and paste it to a blank sheet, you just create a copy of the original.

Start the macro recorder
right click the sheet 1 tab
click move or copy
check Create a copy
click OK
rename the sheet
Stop the macro recorder and see what it produced

It can be reduced to something like this to be used in your command button macro.
Code:
    Sheets("Sheet1").Copy before:=Sheets(1)
    ActiveSheet.Name = SheetName
Reply With Quote