Hello bikeski.
what is the content of your variables? Numbers as strings? Month names? How do they get filled? To find the weekday for a date, you can use
wkDay = Application.WorksheetFunction.Text(Date, "dddd")
In this example, Date is the current date, so you'd need to replace it with a date in valid date format.
In any case, you definitely don't need seven levels of If - Elseif.
cheers, teylyn