Scoobydoo2006, try 4 d's

ThisWorkbook.Worksheets(Format(Now, "dddd")).Activate


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"scoobydoo2006"
wrote in message
news:scoobydoo2006.2axt82_1152883821.5914@excelfor um-nospam.com...

I actually had the days spelled out but I changed it and your code
works. I tried to expand it to 8-ddd... for the full name of the day
but it errored. If you know how to use the full day name please pass it
on and I will use it. If not, thanks for what you gave me.

Scooby


--
scoobydoo2006
------------------------------------------------------------------------
scoobydoo2006's Profile:
http://www.excelforum.com/member.php...o&userid=35372
View this thread: http://www.excelforum.com/showthread...hreadid=561303