Datepicker, Default to previous workday

[cizzett]

OK I have this in my code which defaults the datepicker to todays date but I have tried to no avail to get it to use previous workday as defasult date.

I know this is gonna be simple but here is what I have now which works for today.

PrevRptDate.PrevDTPicker.Value = Date

I have tried a few different ways but I will default to your expertise.

 

[MARK858]

Try the below but you will have to amend it to take care of Public holidays etc.

PrevRptDate.PrevDTPicker.Value = CDate(Evaluate("WORKDAY(TODAY(),-1)"))

Please note that the above is untested with a DatePicker, only tested the date with a cell.

 

[cizzett]

That works Perfectly.

I truly appreciate the assist, thanks MARK858!!!!!!!!

 

[MARK858]

You're welcome, if you need to take account of Public holidays/holidays then put the dates in a range of cells (in this case Sheet2 J1:J5) and amend the code as below.

PrevRptDate.PrevDTPicker.Value = CDate(Evaluate("WORKDAY(TODAY(),-1,[COLOR="#FF0000"]Sheet2!J1:J5[/COLOR])"))