Copiar 1 hoja de excel varias veces en el mismo libro

hola, Ale !

... deseo poder copiar una misma hoja dentro del mismo libro varias veces
... hasta ahora solo puedo hacerlo pero de una copia
... hay alguna opcion para poner copiar hoja por ej: 50 veces...

(hasta donde se) solo usando macros (p.e.)

Sub Copiar_HojaActiva_nVeces()
Dim n As Byte
For n = 1 To 50
Worksheets("hoja1").Copy After:=Worksheets(Worksheets.Count)
Next
End Sub

o algo parecido (p.e.):
- podrias copiar la hoja una vez (ya tienes 2)
- seleccionas las dos hojas y las copias (ya tienes 4)
- seleccionas las cuatro hojas y las copias (ya tienes 8)... y asi sucesivamente

saludos,
hector.