Como obtener el número de quincena perteneciente a una fecha dada.
Sres. T. E
Necesito de Uds. Lo siguiente:
Una macro la cual muestre el Número de la quincena dependiendo de una fecha correspondiente al año.
Ejemplo:
Si transcribo la fecha dentro del rango 01/01/2018 al 15/01/2018 muestre “01” , 16/01/2018 al 31/01/2018 muestre “02” , 01/02/2018 al 28 o 29/02/2018 muestre “03” y así sucesivamente.
1 Respuesta
No sé para que necesitás una macro, lo podrías hacer directamente con la función 'DIA'
Sería algo más o menos así
=SI(DIA(celdaFecha) <=15; "01"; "02")
Nota: puede que en lugar del punto y coma (;), debas poner coma (,)
Si igualmente insistes en hacerlo con macros, entonces te dejo la siguiente DFU que toma una fecha y devuelve 1 o 2 según la quincena
Function Quincena(dia As Date) As Integer If Day(dia) < 16 Then Quincena = 1 Else Quincena = 2 End If End Function
Salu2
Te envió de nuevo el Ejemplo
Ejemplo:
Si transcribo la fecha dentro del rango 01/01/2018 al 15/01/2018 muestre “01” , 16/01/2018 al 31/01/2018 muestre “02” , 16/02/2018 al 28 o 29/02/2018 muestre “03” y así sucesivamente
Con la formula recibida solo me mostrara "01" y "02" y no la "03", "04" para las del resto del Año, Observe en el ejemplo la Fecha 16/02/2018 al 28 o 29/02/2018 la sera la quincena "03".
Nota: En el ejemplo original tuve un error en indicarle el rango del mes completo 01/02/2018 al 28 o 29/02/2018.
Ok, es que como decías quincena, pensé que solo eran los valores 1 ó 2, te deja la función que hace esto para que la escribas directamente (sin macros)
=(MES(celdaFecha) - 1) * 2 + SI(DIA(celdaFecha) <=15; 1; 2)
Salu2
¡Gracias! GUSTAVO
Por pronta repuesta y acertada.
Tu fórmula funciona como lo esperaba, la cual la convertiré en una función para su uso.
Saludos