miércoles, 9 de noviembre de 2016

Calcular Bimestre, Trimestre, Cucatrimestre y Semestre de una fecha en Excel



Los BIMESTRES, TRIMESTRES, CUATRIMESTRES y SEMESTRES son duración de tiempo del orden de dos, tres, cuatro y seis meses consecutivos. A menudo utilizado en una planificación de calendario con horizonte anual, cuando trabajamos con fecha en Microsoft Excel, a menudo disponemos de las fechas, pero no sabemos a que periodo corresponde, en esta publicación veremos tres formas de obtener esta duración de tiempo.

Bimestre, Trimestre, Cuatrimestre y Semestre


En el primer ejemplo utilizaremos la siguientes formulas:

Para lograr el objetivo utilizaremos las siguientes funciones ENTERO(Redondea un número hasta el entero inferior más próximo) y MES (Devuelve el mes de una fecha representada por un número de serie. El mes se expresa como número entero comprendido entre 1 "enero" y 12 "diciembre")

BIMESTRE       =ENTERO((MES(A5)+1)/2)
TRIMESTRE    =ENTERO((MES(A5)+2)/3)
CUATRIMESTRE    =ENTERO((MES(A5)+3)/4)
SEMESTRE    =ENTERO((MES(A5)+5)/6)

En el segundo ejemplo utilizaremos la siguientes formulas:

En este ejemplo utilizaremos la funcion REDONDEAR.MAS(Devuelve un número redondeado hacia arriba hasta el próximo número entero par) y la función MES.

BIMESTRE    =REDONDEAR.MAS(MES(A21)/2,0)
TRIMESTRE    =REDONDEAR.MAS(MES(A21)/3,0)
CUATRIMESTRE    =REDONDEAR.MAS(MES(A21)/4,0)
SEMESTRE    =REDONDEAR.MAS(MES(A21)/6,0)

En el tercer ejemplo utilizaremos la siguientes formulas:

Para este ejemplo utilizaremos una UDF que utiliza las funciones RoundUp y Month

Para este ejemplo utilizaremos las funciones de Excel desde VBA a través del objeto WorksheetFunction la única condición es ingresar la función en inglés en la que utilizaremos la función ROUNDUO(Redondea un número hacia arriba, lejos de 0 (cero)).

El siguiente codigo lo ingresamos en un modulo:

Function Periodo(fecha As Date, TPeriodo As Integer) As Integer

Select Case TPeriodo
    Case 2
        'Bimestre
        Periodo = WorksheetFunction.RoundUp(Month(fecha) / 2, 0)
    Case 3
        'Trimestre
        Periodo = WorksheetFunction.RoundUp(Month(fecha) / 3, 0)
    Case 4
        'Cuatrimestre
        Periodo = WorksheetFunction.RoundUp(Month(fecha) / 4, 0)
    Case 6
        'Semestre
        Periodo = WorksheetFunction.RoundUp(Month(fecha) / 6, 0)
End Select

End Function

Ahora ya podemos utilizar la función desde una celda de excel, solo hay que ingresar la función PERIODO ingresar la celda donde se encuentra la fecha en este caso es "A34" y seguidamente indicar el periodo si es 2,3,4 o 6

BIMESTRE    =PERIODO(A37,2)
TRIMESTRE    =PERIODO(A37,3)
CUATRIMESTRE    =PERIODO(A37,4)
SEMESTRE    =PERIODO(A37,6)

Estas son las tres formas de lograr el mismo resultado, espero le encuentren utilidad, si les gusto la publicación me ayudarian mucho si lo comparten en las redes sociales.

No hay comentarios :

Publicar un comentario