Nombre en hojas.

07/02/2008 - 08:44 por Noe´s | Informe spam
Hola a todos, con una pequeña consulta, tengo 31 hojas que serian los 31 dias
del mes y le quiero poner a cada una una palabra similar como es el mes,
ejemplo 01 de febrero, 10 de febrero... 31 de febrero, existira alguna
manera en la cual pueda ponerlo por medio de un macro o alguna función.

Gracias desde ya y un gran saludo hasta alla.
Noe´s

Preguntas similare

Leer las respuestas

#1 victorbcn1952
07/02/2008 - 09:12 | Informe spam
Función no creo que exista; macro probablemente sí podrá hacerse, pero
si sólo tienes 31 hojas, me parece que te "va a salir más caro"
diseñar la macro, escribirla, probarla, verificar que funcione,
guardarla,... que, lisa y llanamente, cambiar una por una los nombres
de las hojas (doble click en el nombre, modificación, y a correr).

Otra cosa: no hace falta que hagas una hoja para el 31 de
febrero... ;-) ) )

:-)


Hola a todos, con una pequeña consulta, tengo 31 hojas que serian los 31 dias
del mes y le quiero poner a cada una una palabra similar como es el mes,
ejemplo 01 de febrero, 10 de febrero... 31 de febrero, existira alguna
manera en la cual pueda ponerlo por medio de un macro o alguna función.

Gracias desde ya y un gran saludo hasta alla.
NoeŽs
Respuesta Responder a este mensaje
#2 Juan M
07/02/2008 - 11:11 | Informe spam
Hola Noe´s

Prueba la siguiente macro en un modulo estandar

Sub CambioNombreHoja()
Dim mes As String
Dim Hoja As Worksheet

mes = InputBox("Escribe el mes", "MES", Format(Date, "mmmm"))

For Each Hoja In ThisWorkbook.Worksheets
Hoja.Name = Hoja.Name & " de " & mes
Next Hoja

End Sub

Un saludo,
Juan

"Noe´s" escribió
Hola a todos, con una pequeña consulta, tengo 31 hojas que serian los 31
dias
del mes y le quiero poner a cada una una palabra similar como es el mes,
ejemplo 01 de febrero, 10 de febrero... 31 de febrero, existira alguna
manera en la cual pueda ponerlo por medio de un macro o alguna función.

Gracias desde ya y un gran saludo hasta alla.
Noe´s
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida