date() option

[Vo0do0uk]

i'd like to show in a text box on a form the date for the next monday available

so say today is 7/7/05 id like it to work out the next monday which is 10/7/05 and put this date into the text box?!

any ideas??

 

[___]

=Date()-Weekday(Date(),0)+8

 

[Vo0do0uk]

That doesn't seem to work

do i need to change it or is that just what i need to enter for the source?

 

[___]

Put it in the Control Source of a text box

 

[Vo0do0uk]

Yeah as soon as i sent it i worked out prob! needed to save form for it to take effect!

works a treat!

how does it work though? just so i know and i've not just copied it off ya

 

[Vo0do0uk]

For example:

how could i modify it to show the sunday after the monday?

so i'd have next monday date: 10/07/04

next sunday date 17/07/04

 

[Vo0do0uk]

Sorted that

just took the text box with the code in, made another text box

found number of first text box eg text17 and used this code:

=[Text17]+7

voila!

 

[___]

next sunday date 17/07/04

=Date()-Weekday(Date(),0)+14

 

[___]

so i'd have next monday date: 10/07/04

next sunday date 17/07/04

That's some time difference from where I am!

 

[___]

Date functions:

The current month:
DateSerial(Year(Date()), Month(Date()), 1)

The next month:
DateSerial(Year(Date()), Month(Date()) + 1, 1)

The last day of the current month:
DateSerial(Year(Date()), Month(Date()) + 1, 0)

The last day of the next month:
DateSerial(Year(Date()), Month(Date()) + 2, 0)

The first day of the previous month:
DateSerial(Year(Date()), Month(Date())-1,1)

The last day of the previous month:
DateSerial(Year(Date()), Month(Date()),0)

The first day of the current quarter:
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 1, 1)

The last day of the current quarter:
DateSerial(Year(Date()), Int((Month(Date()) - 1) / 3) * 3 + 4, 0)

The first day of the current week (assuming Sunday = day 1):
Date() - WeekDay(Date()) + 1

The last day of the current week:
Date() - WeekDay(Date()) + 7

The first day of the current week (using settings in Options dialog box):
Date() - WeekDay(Date(), 0) + 1

The last day of the current week:
Date() - WeekDay(Date(), 0) + 7