Hola a todos.

 Tengo una hoja que quiero duplicar 100 veces y renombranlas desde el 1 al 100

Os agradecería me ayudéis ya que hacerlo a mano es muy laborioso dado que lo tengo que hacer en varios libros

 

 

COPIAR HOJA 100 VECES.rar

Esta es la mcro que se ejecutará con la combinación de Teclas

Ctrl + Shift + G

Te muestro la mcro:

Sub Macro3()
' Acceso directo: Ctrl+Mayús+G
    num_hojas = 3
    For i = 2 To num_hojas
        Sheets("1").Select
        Sheets("1").Copy After:=Sheets(i - 1)
        Sheets("1 (2)").Select
        ActiveSheet.Name = i
        Range("E1") = i
    Next
End Sub
 

En la variable num_hojas le puse 3 (repetirá 3 veces... tu lo podrás cambiar a 100

NO podrás ejecutar mas de una vez la macro en este archivo. Tendras que borrar hojas o cargarlo de nuevo

Saludos

COPIAR HOJA 100 VECES.xlsm

Gracias por responder tan rápido y solucionar la macro.

Solo que se me olvidó poner una hoja anterior a la hoja "1". Es en la que van los datos. Al ejecutar la macro me las ordena de la siguiente manera: datos,2,3,1

COPIAR HOJA 100 VECES.rar

checalo y si todo bien da clic en el corazoncito del lado derecho para finalizar

COPIAR HOJA 100 VECES - 2.xlsm

perfecto