Excel: Armar una fecha estándar

Sea que usemos una macro o las funciones de hoja de Excel, el procedimiento para armar la fecha es el mismo en ambos casos:

– Descomponer el dato original en sus tres partes (año, mes y día).

– Armar con ellos la fecha correspondiente.

Comencemos por las funciones. Supongamos que el dato original está en [B1]:

– Extraemos el año con =IZQUIERDA(B1;4).

– Extraemos el mes con =EXTRAE(B1;5;2).

– Extraemos el día con =DERECHA(B1;2).

Las funciones primera y última son bastante fáciles de entender. Extraen la cantidad de caracteres especificados, a la izquierda o a la derecha, respectivamente. La del medio es un poco más compleja.

Tenés tres argumentos entre los paréntesis:

– El primero es el dato donde se hace la extracción.

– El segundo es la posición a partir de la cual se hace la extracción. En este caso, a partir del quinto dígito (los cuatro primeros son los del año).

– El tercero es la cantidad de caracteres que se extraen.

Finalmente, juntamos todo en una fecha con la función

FECHA: =FECHA(IZQUIERDA(B1;4);EXTRAE(B1;5;2);DERECHA (B1;2)).

La función FECHA arma una fecha a partir de sus tres componentes. El primer argumento es el año; el segundo, el mes, y el tercero, el día.

Si queremos hacer esto mismo con una macro, solo tenemos que reemplazar las funciones por sus equivalentes en Visual Basic, el lenguaje de las macros. Si tenemos una serie de fechas en el rango [B1:B10], la macro sería algo así:

Sub fechas()
For i = 1 To 10
dato = Cells(i, “B”)
aa = Left(dato, 4)
mm = Mid(dato, 5, 2)
dd = Right(dato, 2)
Cells(i, “B”) = DateSerial(aa, mm, dd)
Next
End Sub

Como puede adivinarse, la función Mid equivale a EXTRAE, y la función DateSerial, a FECHA.

Esta macro toma cada dato de la columna [B], los separa en tres partes, arma una fecha con ellas y guarda esa fecha en la misma celda.