Que formula ocupar para renombrar varias hojas de excel a la vez utilizando el campo y8 de cada hoja?

11/10/2007 - 21:22 por MGL19DF | Informe spam
Tengo un libro de esxel que se llama Folios y este libro jala datos de
otro a su vez, pero del libro Folio necesito que cada hoja de jale
automaticamente un nombre que esta hubicado en la celda y8, utilice la
siguiente formula, pero solo se aplica a la primer hoja, he intentado
modificarla pero no tengo exito.
Me gustaria saber si alguien tiene por ahi o sabe la formula exacta
para que cada hoja de este libro sea renombrada automaticamente cada
vez que abra el documento.

Sub NombreHoja()
ActiveSheet.Name = Range("Y8").Value
End Sub

si alguien me puede ayudar se lo agradecere muchisimo.

Preguntas similare

Leer las respuestas

#1 Abraham
11/10/2007 - 22:53 | Informe spam
La verdad tu explicacion esta un poquitin enredada, pero creo que esto
es lo que buscas:

Sub nombrarhoja()
Dim hoja As Worksheet
For Each hoja In Worksheets
hoja.Name = hoja.[Y8]
Next
End Sub


Abraham
Respuesta Responder a este mensaje
#2 MGL19DF
12/10/2007 - 17:40 | Informe spam
On 11 oct, 15:53, Abraham wrote:
La verdad tu explicacion esta un poquitin enredada, pero creo que esto
es lo que buscas:

Sub nombrarhoja()
Dim hoja As Worksheet
For Each hoja In Worksheets
hoja.Name = hoja.[Y8]
Next
End Sub

Abraham



MUCHISIMAS GRACIAS ABRAHAM

NO TIENES IDEA DE CUANTO TE LO AGRADEZCO.

SALUDOS..
Respuesta Responder a este mensaje
#3 Abraham
12/10/2007 - 21:57 | Informe spam
De nada amigo.

Abraham
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida