Date en anglais vers français

Gemstar -  
Mike-31 Mensajes publicados 18405 Fecha de registro   Estado Colaborador Última intervención   -
Hola,

Primero, perdón si se trata de un duplicado, sin embargo, no encontré respuesta a mi problema en otros posts/temas.

Bien, tengo un archivo cuyas fechas están en inglés.
En forma de "01-DEC-2011" por ejemplo.
Sin embargo, cuando cambio el formato de mis celdas a un formato de fecha,
algunos meses no se convierten porque los meses están en inglés.

FEB debe convertirse en Févr
APR debe convertirse en AvR
MAY debe convertirse en MAi
AUG debe convertirse en AUoût
DEC debe convertirse en DéC

Cuando lo modifico manualmente, funciona.

¿Tendrían alguna pista o un código VBA para convertirlos? de hecho, tengo más
de 60 archivos, cada uno con aproximadamente 400 fechas.

Gracias por su ayuda.

Cordialmente,

Remy

2 respuestas

  1. Mike-31 Mensajes publicados 18405 Fecha de registro   Estado Colaborador Última intervención   5 147
     
    Hola,

    prueba así para una fecha en formato inglés Feb-1-2017 ingresada en A2

    =(INDEX({1;2;3;4;5;6;7;8;9;10;11;12};COINCIDIR(IZQUIERDA(A2;ENCONTRAR("-";A2)-1);{"Jan";"Feb";"Mar";"Apr";"May";"Jun";"Jul";"Aug";"Sep";"Oct";"Nov";"Dec"};0))"/"&DERECHA(A2;LARGO(A2)-ENCONTRAR("-";A2)))*1

    o con BUSCAR
    =(INDEX({1;2;3;4;5;6;7;8;9;10;11;12};COINCIDIR(IZQUIERDA(A2;BUSCAR("-";A2)-1);{"Jan";"Feb";"Mar";"Apr";"May";"Jun";"Jul";"Aug";"Sep";"Oct";"Nov";"Dec"};0))"/"&DERECHA(A2;LARGO(A2)-BUSCAR("-";A2)))*1


    sin embargo, si tu formato es 01-DEC-2011

    =FECHA(DERECHA(A2;LARGO(A2)-ENCONTRAR("-";A2;ENCONTRAR("-";A2)+1));(INDEX({1;2;3;4;5;6;7;8;9;10;11;12};COINCIDIR(EXTRAE(A2;ENCONTRAR("-";A2)+1;ENCONTRAR("-";A2;ENCONTRAR("-";A2)+1)-ENCONTRAR("-";A2)-1);{"Jan";"Feb";"Mar";"Apr";"May";"Jun";"Jul";"Aug";"Sep";"Oct";"Nov";"Dec"};0)))*1;IZQUIERDA(A2;ENCONTRAR("-";A2)-1))

    luego formatea tus celdas en el formato deseado

    A+
    Mike-31

    Yo soy responsable de lo que digo, no de lo que tú entiendes...
    0
    1. Gemstar
       
      Hola,

      Gracias por tu rápida respuesta.
      Funciona con tu formato que es FEB-1-2011, sin embargo, no funciona con el formato "01-FEB-2011", por lo que ahora hay que invertir los días y los meses.

      Gracias de nuevo


      Remy
      0
    2. Gemstar
       
      He creado una macro con el grabador que utiliza un control+H
      funciona pero no es óptimo.

      Gracias por tu ayuda

      Remy
      0