Saving a copy of a worksheet

P

Pat

How do you save a worksheet via a command button which will save and name it
by increments of one. For example Sheet1 is saved and named Sheet2, Sheet1
is saved again and named Sheet3, and so on.

Any help is most appreciated.
Pat
 
J

Jim May

Perhaps first you need to get your terms right. Only Workbooks are saved.
Worksheets are "within" workbook(s). Come back...
 
P

Pat

Sorry I did not make myself clear, I want to create a copy(s) of a worksheet
whithin a workbook.
 
G

Gerald Evans

On Sheet 1 create a Command Button and name it cmdAdd. Right click on the
sheet tab named Sheet 1, select "View Code" and add the following code;
Private Sub cmdAdd_Click()
Sheets("Sheet1").Select
Sheets.Add
End Sub
 
P

Pat

Thank you for helping me out.

Regards
Pat

Gerald Evans said:
On Sheet 1 create a Command Button and name it cmdAdd. Right click on the
sheet tab named Sheet 1, select "View Code" and add the following code;
Private Sub cmdAdd_Click()
Sheets("Sheet1").Select
Sheets.Add
End Sub
Click to expand...
 
Top