Add 4 working days to =Today()

[piranhagirl]

I need to calculate 4 working days from the date an order is received. I have a cell B3 "=Today()" then in B4 I want the result of "=Today() + 4 Working days"

How do I do this?

[bhofsetz]

Fist of all what are you calling 'Working Days' ?

You can find out what day of the week a certian date is by formatting the date with mm\dd\yyyy ddd output. For example todays date May 19, 2005 would return
05/19/2005 Thu

This will help you distinguish between weekdays and weekends but holidays will have to be handled differently.

[piranhagirl]

Work days would be M-F. I don't actually care what day of the week it is. All I want to do is add 4 days to 'Today'...not including weekends.
ie. for today 5-19-05
My cell says =Today() Output reads 5-19-05
I want a format to say =Today()+4 Work Days Output should read 5-25-05....but it doesn't it says 5-23-05.

[piranhagirl]

Does anyone know how to do this?

[bhofsetz]

I think I've got it working as a macro but didn't have time to fully test it. I am currently trying to get it written as a UDF for you.

Here is the macro code if you want to take a look
It will calculate the due date for any dates in the range you have selected and output those one cell to the right.

Please Login or Register  to view this content.

Hope this helps

[Piranha]

I need to calculate 4 working days from the date an order is received. I have a cell B3 "=Today()" then in B4 I want the result of "=Today() + 4 Working days"

How do I do this?

Hi
Would this work?
If B3 has the current date then in B4 put ''=WORKDAY(B3,4)
Without the quotations of course, and format the cell as you want it.
Dave

[bhofsetz]

Here's a User Defined Function that should do what you want.

Place this code in the workbook module. If you want it avaliable to any workbook opened on that machine then you can place it in a workbook module of the Personal.xls workbook.

Please Login or Register  to view this content.

To call the function simply type
=DueDate(Cell Reference)
directly in the worksheet

Hope this helps

[bhofsetz]

Here's another possible solution that may be just as easy to implement

put this worksheet formula into whichever cell you want the Date+4 work days.

=IF(WEEKDAY(C4)=1,C4+5,IF(WEEKDAY(C4)=2,C4+4,IF
(WEEKDAY(C4)=3,C4+4,C4+6)))

This all goes on one line (in one cell) even though it looks like two lines here.

HTH

[mangesh_yadav]

I need to calculate 4 working days from the date an order is received. I have a cell B3 "=Today()" then in B4 I want the result of "=Today() + 4 Working days"

How do I do this?

Yet another approach. Use the following function:
=WORKDAY(B3,4)

Note: You need to enable the Analysis ToolPak to use the above function. For this, just go to TOOLS > ADDINS. And check the box for Analysis ToolPak

- Mangesh

[Piranha]

Yet another approach. Use the following function:
=WORKDAY(B3,4)

Note: You need to enable the Analysis ToolPak to use the above function. For this, just go to TOOLS > ADDINS. And check the box for Analysis ToolPak

- Mangesh

Hi
Same solution i posted ealier, BUT "Thank you" Mangesh for adding about the
Analysis Toolpak. I forget about that being an ADDIN.
Thx
Dave

[mangesh_yadav]

Hi Dave,

I hadn't seen your post inbetween. Saw the last post of bhofsetz and then posted the solution. Anyway, sorry for the double post.

Mangesh

[Piranha]

Hi Dave,

I hadn't seen your post inbetween. Saw the last post of bhofsetz and then posted the solution. Anyway, sorry for the double post.

Mangesh

Mangesh,
Please don't be sorry. I am happy i knew an answer, to a question. AND i forgot
about the Analysis toolpak. Very glad you posted with that info.
Thx
Dave

[piranhagirl]

THANK YOU!!!! You have made my life so much easier!