Copy a sheet more than one time

M

marko

Hi again!
Is there a way to make more than one copy of a sheet? Lets say that i
would like to copy my sheet 12 times, how can i do that?
Thanks again.

Marko
 
K

Ken Johnson

Hi marko,
1.copy gives 2 sheets.
2.Select original and copy (click original's tab>press shift while you
click copied sheet's tab)
3.copy again gives 4 sheets.
4. Select original and the three copies as before
5.copy again gives 8 sheets
etc etc for 16,32, 64....

Ken Johnson
 
G

Gord Dibben

Marko

Sub SheetCopy22()
Dim i As Long
Application.ScreenUpdating = False
howmany = InputBox("Copy Active Sheet How Many Times?")
For i = 1 To howmany
ActiveSheet.Copy Before:=Sheets(1)
Next i
Application.ScreenUpdating = True
End Sub


Gord Dibben Excel MVP
 
Top