=IF(AND(holiday_date=wk,holiday_date<ewk),""In"," Out")

--

HTH

Bob Phillips

(replace xxxx in the email address with gmail if mailing direct)

"Nicole Seibert" wrote in message
...
Hello kind helpers,

I am working on part of an application that looks at compliance with
performance standards for time entry in MS Project using extracted data
with
VBA in Excel (of course.)

I have the first and last day of the week desinated as wk and ewk,
respectively.
I have a list of standard holidays for US and other countries. Depending
on
the resource (person's) category (US, or specified country) I need to
adjust
their expected work hours entered based on whether there is a holiday or
not.

The holidays need to be entered and available for the entire year, but I
will work on that later.

What I really need here is some help on how to program the comparison of
the
date of the holiday (standard format = 7/04/2006) to the week, encompassed
by
wk and ewk, in question. I capture the wk and ewk this way:

wk = (Today() - 8)
wkd = (Today() - 1)
twk = wk & " - " & wkd

twk I use in an email message and as far as I know is only good for that.

If you have any suggestions or questions please let me know. I appreciate
your help.