First Day Of Previous Month

[The Report Guy]

Hi,

I'm trying to capture the day first day of the previous month. I figured
out how to do it for the current month (see function below) but I can't
figure out how to make my function go back to the previous month.

Date()-Day(Date())+1

Thanks

 

[Jon Lewis]

Sure there must be an easier way but this works:
Date()- Day(Date()) - Day(Date()- Day(Date())-1)

 

[Ken Sheridan]

There are various ways, e.g.

DateSerial(Year(Date()),Month(Date())-1,1)

Even if the current month is January, and Month(Date())-1 consequently
evaluates to 0, this will nevertheless return 1 December of the previous year.

Ken Sheridan
Stafford, England

 

[Tom]

I use the following for the first day of the month of any given date
(add error handlers as appropriate):


****************
Public Function fncFirstofMonth(dtmDate As Date) As Date

fncFirstofMonth = DateSerial(Year(dtmDate), Month(dtmDate), 1)

End Function
******************

Easily modified to:

*****************
Public Function fncFirstofLastMonth(dtmDate As Date) As Date

fncFirstofLastMonth = dateadd("m", -1, DateSerial(Year(dtmDate),
Month(dtmDate), 1))

End Function
******************

Tom

 

[The Report Guy]

Ken & Jon thank you both. I played with both functions and they both work
great. I will add the functions on my query so I can finally automate our
reports.