Hello Scooby

Change the "ddd" to "dddd" to get the full name of the day. Here is th
code with the change..

Code
-------------------

Private Sub Workbook_Open(

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

End Su

-------------------

Sincerely
Leith Ros

--
Leith Ros
-----------------------------------------------------------------------
Leith Ross's Profile: http://www.excelforum.com/member.php...fo&userid=1846
View this thread: http://www.excelforum.com/showthread.php?threadid=56130