Renombrar automático

¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
Hola!

facil

for each Hoja in Thisworkbook.sheets
activesheet.name=activesheet.range("ElQueSea")
next hoja

Escrito al vuelo, así que verifica la sintáxis

Saludos a todos desde Huelva

Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail PUNTO com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio
"juanpacasa" escribió en el mensaje
de noticias news:

¡ Hola !
Tengo un libro de excel con 42 hojas, cada hoja corresponde a una ficha de
una
persona, ¿cómo puedo nombrar cada hoja con el valor de una celda
donde esta contenido el nombre de cada persona?

__________ Information from ESET Smart Security, version of virus
signature database 6783 (20120110) __________

The message was checked by ESET Smart Security.

http://www.eset.com

__________ Information from ESET Smart Security, version of virus signature database 6783 (20120110) __________

The message was checked by ESET Smart Security.

http://www.eset.com