![Antiguo](http://static.forosdelweb.com/fdwtheme/images/statusicon/post_old.gif)
12/02/2009, 19:42
|
![Avatar de mrocf](http://static.forosdelweb.com/customavatars/avatar174421_2.gif) | | | Fecha de Ingreso: marzo-2007 Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 10 meses Puntos: 88 | |
Respuesta: pestañas de hojas del libro
Hola! eljamb. Una opción podría ser el siguiente código VBA:
Código:
Sub CambioDeNombre()
n = 2
Application.ScreenUpdating = False
For ii = 2 To Sheets.Count
Sheets(ii).Name = "Cacho" & ii
Next ii
For ii = 2 To Sheets.Count
Sheets(ii).Name = Sheets(ii - 1).Name + n
Next ii
Application.ScreenUpdating = True
End Sub
Te aclaro que la sección:
Código:
For ii = 2 To Sheets.Count
Sheets(ii).Name = "Cacho" & ii
Next ii
probablemente no sea necesaria.
Sin embargo, la he incluído previendo algunas "cuestiones" que se te puedan haber olvidado mencionar.
Saludos, Cacho. ![Afirmando](http://static.forosdelweb.com/fdwtheme/images/smilies/afirmar.gif) |