Hi Terri
Can you post a copy of your workbook containing the code and we can have a look for you.
Tony(OTPM)

Thanks, have attached a briefer version of the full file (only due to the size of the main file) but this does have the bits I am trying to sort.
Terri

Attached Files

CC SOW.xlsm (89.1 KB, 13 views)

Hi
In the Validate_Fields() Function change:

If Not Weekday(Range("B7").Value) = vbMonday Then
MsgBox "Start Date must be a Monday (week beginning)", vbInformation

to

If Not Weekday(Range("B7").Value) = vbMonday Or vbTuesday Or vbWednesday Or vbThursday Or vbFriday Then
MsgBox "Start Date must be a Weekday", vbInformation

I think this will give you what you want. I am unable to step through the code because there are missing sheets.

Hope this helps.
Good luck.
Tony(OTPM)

Hi Tony
Thanks for this. I have copied your code over and it now just brings up the message 'start date must be a monday (week beginning)'. I have re-attached the file with other sheets included, I have managed to reduce the size by taking a lot of completed data out. On the Setup sheet and LP sheet I have added some notes in red that might explain a little more what is wanted.
Thanks again
Terri

Attached Files

CC SOW.xlsm (151.3 KB, 15 views)

Hi
Try commenting out the code that checks for a Monday and see if that gives you what you need.
Hope that helps.
Tony(OTPM)