Copy Worksheet X Times Based on Cell Value

How can i write a macro that will copy the active worksheet x times based on a value in a named range?


I tried changing up a formula i found here but no luck so far:
http://www.excelforum.com/excel-prog...-of-times.html


Here is what i have:

Please Login or Register  to view this content.

The above reveals the TR_Crane worksheet then copies it (3) additional times although the number in the named range is a "2".

It worked okay for me. A two in the range and I get two copies.

You are right thank you. I did not think it through enough when writing the code (bangs palm on forehead). I wanted it to count the first active sheet at "1" and add the remaining sheets to equal the total.

Changing "For i = 1 To copynum" to "For i = 1 To copynum -1" did the trick.