Help fixing date to be the past Thursday

[nbaj2k]

I was wondering if someone can help me, I know some people helped me to figure out the code so that it would come up with the date of "The most recent thursday", but now I need it to be the header of an email in a macro.

This is what I have right now, but it is coming up with August 11th, instead of the 9th.

.Subject = "Thursday Reports through " & Format(Date - Weekday(Today - 4), "mmm-d-yy")

Is there something that is a little off?

Thanks,

~J

[Bob Phillips]

Subject = "Thursday Reports through " & Format(Date - Weekday(Date - 4),
"mmm-d-yy")

--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

"nbaj2k" <[email protected]> wrote in
message news:[email protected]...
>
> I was wondering if someone can help me, I know some people helped me to
> figure out the code so that it would come up with the date of "The most
> recent thursday", but now I need it to be the header of an email in a
> macro.
>
> This is what I have right now, but it is coming up with August 11th,
> instead of the 9th.
>
> Subject = "Thursday Reports through " & Format(Date - Weekday(Today -
> 4), "mmm-d-yy")
>
> Is there something that is a little off?
>
> Thanks,
>
> ~J
>
>
> --
> nbaj2k
> ------------------------------------------------------------------------
> nbaj2k's Profile:
http://www.excelforum.com/member.php...o&userid=36480
> View this thread: http://www.excelforum.com/showthread...hreadid=571358
>