Workday function to find the midmonth business day of the month error

[spicy]

Hi All,

I have been trying to fix the below syntax for hours but not successful at all. Could someone please help me?

Midmonthworkday=application.Workday(Application.Date(Year(Date),Application.month(date),14),1)

Your help is very much appreciated!!!

 

[Joe4]

Try this:

midmonthworkday = Application.WorkDay([COLOR=#ff0000]DateSerial[/COLOR](Year(Date), Month(Date), 14), 1)

 

[Rick Rothstein]

Try this:

midmonthworkday = Application.WorkDay([COLOR=#ff0000]DateSerial[/COLOR](Year(Date), Month(Date), 14), 1)

Probably a tad slower, but here is an alternate method...

midmonthworkday = [WORKDAY(DATE(YEAR(NOW()),MONTH(NOW()),14),1)]

 

[spicy]

It works perfectly! Thank you very much, Joe4

 

[Joe4]

You are welcome.

 

[spicy]

Rick, thanks a lot for your response! I tried your formula and it gives me the same desired outcome. Thank you and have a good day!