Ver Mensaje Individual
  #10 (permalink)  
Antiguo 06/11/2008, 06:59
Avatar de mrocf
mrocf
 
Fecha de Ingreso: marzo-2007
Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 1 mes
Puntos: 88
De acuerdo Valor numérico a fecha

Hola! Pablo.
Una sugerencia inicial: ante una nueva consulta (como lo es la tuya), trata de abrir un nuevo tema.
Como alternativa a lo que te sugiere 3pies :
a) Selecciona el rango de celdas en las que quieres provocar el efecto;

b) Haz clic con el botón derecho de tu ratón en la etiqueta de la hoja (abajo a la izquierda) y selecciona "Ver código";

c) En la ventana que se te abrirá, copia y pega lo siguiente:
Código:
Sub CambiaA_FormatoFecha()
With Selection
  .Value = Evaluate("transpose(transpose(DATE(LEFT(" & _
    .Address & ", 4), MID(" & .Address & ", 5, 2), RIGHT(" & _
    .Address & ", 2) )))")
  .NumberFormat = "dd-mmm-yyyy"
End With
End Sub
d) Selecciona cualquier parte del código anterior y presiona una sola vez la tecla <F5>

Comenta como te ha ido, ¿si?
Saludos para todos, Cacho.

Última edición por mrocf; 06/11/2008 a las 07:14