|
|
#8
08-18-2011, 10:55 PM
|
|||
|
|||
enter in cell B8 this formula =WEEKDAY(B7), and refer in your code to cell B8...
Now, this part of the code should work If Not Weekday(Worksheets("SETUP").Range("B8")) = 2 Then MsgBox "Start Date must be a Monday (week beginning)", vbInformation Range("B7").Select ValidateFields = True Exit Function End If 
|
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
 Calendar without actual dates
|
parnol01 | Project | 1 | 12-16-2015 09:30 AM |
|
Calculating dates
|
Daria11 | Word VBA | 1 | 06-08-2011 06:54 PM |
|
Sequential Dates in Word
|
Ultrap3 | Word | 2 | 02-04-2011 02:53 PM |
|
Calculated dates.
|
Ziggy-R | Word | 10 | 09-28-2010 01:42 AM |
| Adding dates | mkkram | Word | 0 | 11-27-2006 09:18 AM |
Windows Vista 
Office 2007
Threaded Mode