Hey Roy,
Thanks for your help in this matter, and thanks for the worksheet formula.
The Resaon for the vba is that when the workbook opens Today() is checked against the list of Solemn days, if its not in that list then it is checked to see in what Liturgical season the date falls, and then it is checked to see if Today() is a Sunday.
When all the above checking is completed the appropriate information for Today() is then displayed.
I got everything working, more or less, but the subscript out of range error. You hit upon it when you mentioned the dates were TEXT. I forgot about that. So I changed the dates to their number equivalents , ie, April 24, 2011 is 40657. Today() is in Sheet3 A1 and A1 of worksheet Solemn = Sheet3!A1 with the cell formated as number. It works.
Again, thanks to all who replied.
My code:
George
Bookmarks