Anónimo
Cambiar nombre de Hojas de Excel
Hola...
Tengo un archivo de excel, al cual le he ido creando hojas según mi necesidad, ahora tengo un libro con muchas hojas pero en desorden.
Me gustaría saber como puedo cambiar el nombre de todas las hojas para que queden con el mismo nombre pero con una secuencia... Me explico:
Ejemplo... Mi archivo esta asi: datos1 - nomina34 - nomina12- datos15 - etc
Quiero que quede asi: nomina1 - nomina2 - nomina3 - nomina4 - etc.
Muchas Gracias...
Ana M.
Tengo un archivo de excel, al cual le he ido creando hojas según mi necesidad, ahora tengo un libro con muchas hojas pero en desorden.
Me gustaría saber como puedo cambiar el nombre de todas las hojas para que queden con el mismo nombre pero con una secuencia... Me explico:
Ejemplo... Mi archivo esta asi: datos1 - nomina34 - nomina12- datos15 - etc
Quiero que quede asi: nomina1 - nomina2 - nomina3 - nomina4 - etc.
Muchas Gracias...
Ana M.
Respuesta de paramisolo
1
Es fácil aquí te dejo la macro la copias y la pegas en tu editor de VBA y la ejecutas, cambiara todas las hojas por Nomina1, Nomina2...
Sub Cambio()
Dim i As Integer
For i = 1 To ActiveWorkbook.Worksheets.Count
ActiveWorkbook.Worksheets(i).Name = "Nomina" & i
Next i
End Sub
Espero que te sirva
>Un saludo
>Julio
Sub Cambio()
Dim i As Integer
For i = 1 To ActiveWorkbook.Worksheets.Count
ActiveWorkbook.Worksheets(i).Name = "Nomina" & i
Next i
End Sub
Espero que te sirva
>Un saludo
>Julio