obtener la cantidad de dias del mes

¡Importante!: Colabora con el grupo. Contesta a este mensaje
y dinos si te sirvió o no la respuesta dada. Muchas gracias
Hola!
pues no no hay ninguna función, pero puedes calcularlo restando la fecha del
primero del mes del primero del mes pasado

'*******************************************************************************
'* DiasEnMes
'* función que calcula el número de días del mes de la fecha pasada como
parámetro
'* o en su defecto la actual
'* Argumentos: opcional datFecha => cualquier dato considerable como fecha
'* uso: DiasEnMes("01/02/2000") / DiasEnMes(Date) / DiasEnMes(37933)
'* ESH 08/11/03 19:06
'*******************************************************************************

Function DiasEnMes(Optional datFecha As Date) As Integer
If datFecha = "0:00:00" Then datFecha = Date
DiasEnMes = Day(DateSerial(Year(datFecha), Month(datFecha) + 1, 0))
End Function ' DiasEnMes

Saludos a todos
Emilio [MS-MVP Access 2006/11]
miliuco56 ALGARROBA hotmail.com
http://www.mvp-access.com/foro
http://www.mvp-access.es/emilio

"oli" escribió en el mensaje de
noticias:

Hola grupo: En un informe de access necesito hacer cálculos que dependen de
la cantidad de días del mes en cuestión, es decir cuando el mes que muestre
el informe sea enero, el cálculo debe ser con 31, en abril con 30, etc.
¿Existe alguna función en access que devuelva el # de días para un mes?,
sino sugieranme otra solución.
Muchas gracias.
Olimac.