sobre formato de fecha

Hola SkullCrash
la siguiente función convierte, la fecha 14-Aug-03 en 14-ago-03 con el
formato de celda adecuado, podrás mostrar 14/08/03

'***************************************************************************
********
' traduce las fechas formato "Ingles" al castellano
' p.ej.: FechaEspañola("01-apr-01 06:00:00") devuelve 01-Abr-01 06:00:00
'***************************************************************************
********

Public Function FechaEspañola(strFecha As String) As String

Select Case UCase(Mid(strFecha, 4, 3))
Case "JAN"
FechaEspañola = Left(strFecha, 3) & "Ene" & Right(strFecha, 12)
Case "APR"
FechaEspañola = Left(strFecha, 3) & "Abr" & Right(strFecha, 12)
Case "AUG"
FechaEspañola = Left(strFecha, 3) & "Ago" & Right(strFecha, 12)
Case "DEC"
FechaEspañola = Left(strFecha, 3) & "Dic" & Right(strFecha, 12)
Case Else
FechaEspañola = strFecha
End Select ' Mid(strFecha, 4)

End Function ' FechaEspañola

Saludos a desde Huelva

Emilio
miliu56 ARROBA hotmail.com

Reglas de conducta de los grupos de noticias:
http://support.microsoft.com/defaul...newsreglas

"SkullCrash" escribió en el mensaje
news:OFpHP$

Hola a todos:

Tengo una hoja la cual contiene una columna con fechas pero algunas estan

en

este formato 14-Aug-03 y necesito que me salga asi: 14/08/2003, le doy
formato de celda y las coloco en el estilo que necesito pero igual no me
cambia, como puedo hacer:

Gracias de antemano.

Es urgente.

Otra posibilidad, usando fórmulas de hoja de cálculo:

=SI(ESTEXTO(A1);FECHA(DERECHA(A1;LARGO(A1)-ENCONTRAR("-";A1;4))+2000;COINCIDIR(MINUSC(EXTRAE(A1;ENCONTRAR("-";A1)+1;3));{"jan";0;0;"apr";0;0;0;"aug";0;0;0;"dec"};0);VALOR(IZQUIERDA(A1;ENCONTRAR("-";A1)-1)));A1)

Si tu separador de listas fuera la coma, tendrías que sustituir los puntos y comas por ella. Si pudiera haber fechas anteriores al año 2000 habría que modificar la fórmula (y complicarla aún más, me temo).
Un saludo.


Fernando Arroyo
MS MVP - Excel

"SkullCrash" escribió en el mensaje news:OFpHP$

Hola a todos:

Tengo una hoja la cual contiene una columna con fechas pero algunas estan en
este formato 14-Aug-03 y necesito que me salga asi: 14/08/2003, le doy
formato de celda y las coloco en el estilo que necesito pero igual no me
cambia, como puedo hacer:

Gracias de antemano.

Es urgente.

Gracias a ambos, pero mi intencion es dar el siguiente formato: 01/01/2003,
no traducir la fecha de ingles a español.


"Fernando Arroyo" escribió en el mensaje
news:
Otra posibilidad, usando fórmulas de hoja de cálculo:

=SI(ESTEXTO(A1);FECHA(DERECHA(A1;LARGO(A1)-ENCONTRAR("-";A1;4))+2000;COINCID
IR(MINUSC(EXTRAE(A1;ENCONTRAR("-";A1)+1;3));{"jan";0;0;"apr";0;0;0;"aug";0;0
;0;"dec"};0);VALOR(IZQUIERDA(A1;ENCONTRAR("-";A1)-1)));A1)

Si tu separador de listas fuera la coma, tendrías que sustituir los puntos y
comas por ella. Si pudiera haber fechas anteriores al año 2000 habría que
modificar la fórmula (y complicarla aún más, me temo).
Un saludo.


Fernando Arroyo
MS MVP - Excel

"SkullCrash" escribió en el mensaje
news:OFpHP$

Hola a todos:

Tengo una hoja la cual contiene una columna con fechas pero algunas estan

en

este formato 14-Aug-03 y necesito que me salga asi: 14/08/2003, le doy
formato de celda y las coloco en el estilo que necesito pero igual no me
cambia, como puedo hacer:

Gracias de antemano.

Es urgente.

Prueba esto:
=TEXTO(A1;"dd/mm/aaaa")

suponiendo que el dato esté en A1.

:-)

Hola a todos:

Tengo una hoja la cual contiene una columna con fechas

pero algunas estan

en

este formato 14-Aug-03 y necesito que me salga asi:

14/08/2003, le doy

formato de celda y las coloco en el estilo que

necesito pero igual no me

cambia, como puedo hacer:

Gracias de antemano.

Es urgente.

.

Hola SkullCrash
como te dije una vez traducida la fecha de uno u otro modo le aplicas
formato a la celda dd/mm/yy y resuelto


Saludos a desde Huelva

Emilio
miliu56 ARROBA hotmail.com

Reglas de conducta de los grupos de noticias:
http://support.microsoft.com/defaul...newsreglas

"SkullCrash" escribió en el mensaje
news:

Gracias a ambos, pero mi intencion es dar el siguiente formato:

01/01/2003,

no traducir la fecha de ingles a español.


"Fernando Arroyo" escribió en el mensaje
news:
Otra posibilidad, usando fórmulas de hoja de cálculo:

=SI(ESTEXTO(A1);FECHA(DERECHA(A1;LARGO(A1)-ENCONTRAR("-";A1;4))+2000;COINCID

IR(MINUSC(EXTRAE(A1;ENCONTRAR("-";A1)+1;3));{"jan";0;0;"apr";0;0;0;"aug";0;0

;0;"dec"};0);VALOR(IZQUIERDA(A1;ENCONTRAR("-";A1)-1)));A1)

Si tu separador de listas fuera la coma, tendrías que sustituir los puntos

y

comas por ella. Si pudiera haber fechas anteriores al año 2000 habría que
modificar la fórmula (y complicarla aún más, me temo).
Un saludo.


Fernando Arroyo
MS MVP - Excel

"SkullCrash" escribió en el mensaje
news:OFpHP$
> Hola a todos:
>
> Tengo una hoja la cual contiene una columna con fechas pero algunas

estan

en
> este formato 14-Aug-03 y necesito que me salga asi: 14/08/2003, le doy
> formato de celda y las coloco en el estilo que necesito pero igual no me
> cambia, como puedo hacer:
>
> Gracias de antemano.
>
> Es urgente.
>
>