Ver Mensaje Individual
  #5 (permalink)  
Antiguo 16/03/2010, 09:12
Avatar de abrahamvj
abrahamvj
 
Fecha de Ingreso: julio-2006
Ubicación: Lima, Peru
Mensajes: 708
Antigüedad: 17 años, 9 meses
Puntos: 18
Respuesta: Nombre de pestaña en una celda

Prueba asio:

Sub XXX ()
Dim Hoja As WorkSheet
For Each Hoja en WorkSheets
Range("A65536").End(xlUp).OffSet(0,1) = Hoja.Name
Next Hoja
End Sub

Abraham