A colleague of mine asked for a parameter on a report. The report had to run from the first of the previous month, until the last day of the previous month. I solved this with this function :   
    function fnGetLastDayOfMonth(datum as date)     
fnGetLastDayOfMonth = Day(DateSerial(Year(datum), Month(datum) + 1, 0))      
end function      
      
I then called this function in this way :      
      
startdate      
      
=cdate(iif(month(now())=1,year(now())-1,year(now())) & "/" & iif(month(now())=1,12,month(now())-1) & "/01")      
      
enddate      
      
=cdate(iif(month(now()) = 1,year(now())-1,year(now())) & "/" & iif(month(now()) > 1,month(now())-1,12) & "/" & code.GetLastDayOfMonth(cdate(iif(month(now()) = 1,year(now())-1,year(now())) & "/" & iif(month(now()) > 1,month(now())-1,1) & "/" & "1")))      
can’t believe I wrote that function – this will do the trick just fine.
=dateadd(“d”, –1, dateadd(“m”, +1, cdate(year(today()) & “/” & month(today()) & “/1”)))
   
from the parameter. It would then feed the first day of the previous month to that function and there you have it.. the last day. Cool.
Geen opmerkingen:
Een reactie posten