Copy Workseet Within Same Workbook

[lehigh46]

Hi All:

How can I copy (exact copy) a worksheet ten more times within the same
workbook in one operation?


Thanks for your help.


Tom

 

[JE McGimpsey]

One way:

Public Sub Copy10()
Dim i As Long
For i = 1 To 10
ActiveSheet.Copy After:=Sheets(Sheets.Count)
Next i
End Sub

If you're not familiar with macros, see

http://www.mvps.org/dmcritchie/excel/getstarted.htm