Days left in a year

  • Thread starter Thread starter Mike
  • Start date Start date
M

Mike

Hi,
I'd like to display, in a form, # of days left to year end, using today's
date as a referance.
TIA
Mike
 
DatePart("y", Date) will tell you what day of the year it is.

DatePart("y", DateSerial(Year(Date), 12, 31)) will tell you how may days
there are in the current year.

Therefore, you can use, as a control source for your textbox,

=DatePart("y", DateSerial(Year(Date), 12, 31)) - DatePart("y", Date)
 
Mike said:
Hi,
I'd like to display, in a form, # of days left to year end, using
today's date as a referance.
TIA
Mike
Click to expand...

DateDiff("d", Date(), DateSerial(Year(Date()), 13, 0))
 
Hi,
I'd like to display, in a form, # of days left to year end, using today's
date as a referance.
TIA
Mike
Click to expand...

Set the Control Source of a textbox to

=DateDiff("d", Date(), DateSerial(Year(Date()) + 1, 1, 1))


John W. Vinson[MVP]
 
Back
Top