How to Add 2, 5 or 30 working days to a date

[hazeleyre23]

Hi,



I have a date field (Date Entered) which is manually entered in Access, however I have another date field (Date Chased) in which I want this field to automatically populate with +2 working days from Date Entered.

I have a few other fields which I want to add +5 working days and another to i want to be able to +30 working days. However I assume once I have the code I will be able to adjust it.

Thank You

[CJ_London]

use the dateadd function or just

[Date Entered]+2

how to use it? if Date Chased is unbound put

=[Date Entered]+2

in the control source

if it is bound, put

[Date Chased]=[Date Entered]+2

in the Date Entered afterupdate event

[ranman256]

DATEADD("D",2,[datefield])

[hazeleyre23]

Thank you both for your help, that works great but is there anyway I can get it to count working days only so Monday - Friday.

thanks

[CJ_London]

to be clear - by count working days you mean if today is Thursday, you don't want Saturday, you want Monday to be the result of the calculation?

If so you need a UDF. There are many examples out there, here is one

https://social.msdn.microsoft.com/Fo...3?forum=isvvba

in this example, if you are not bothered about bank holidays, remove the if part of the dcount line (and you won't need the holiday table), you just need to retain I=I+1

[hazeleyre23]

Yes that is correct, I want to not count Saturday and Sunday.

How do I then get the field I want to automatically update to refer to this code.

I am fairly new to Access so apologies.

[CJ_London]

OK - so look at the example provided. It will need to go into a general module (i.e. not one which is specific to a form)

[hazeleyre23]

Ok thank you. Does the field have to be a specific type i.e combo box, textbox etc. As at the moment my field textbox therefore it is not giving me the option for Row Source.

Thanks

[CJ_London]

please be clear about whether you are talking about fields or controls, they are different things. Fields are in tables and controls are in forms and reports and can be bound to a field (by entering the field name in the controls controlsource).

if Date Chased is unbound put

=addWorkDays(2, [Date Entered])

in the control source


if it is bound, put

[Date Chased]=addWorkDays(2, [Date Entered])

in the Date Entered afterupdate event