Ver Mensaje Individual
  #4 (permalink)  
Antiguo 17/10/2007, 15:43
Avatar de mrocf
mrocf
 
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 9 meses
Puntos: 88
Necesito Ayuda Urgente, Con Excel

No he leído la respuesta de Abraham, pero intenta con:
Código:
Sub CambiaNombreHoja()
For Each Hoja In Sheets
    Hoja.Name = Hoja.[Y8]
Next Hoja
End Sub 
Saludos