I'll give you a start, and you can post back with specific questions as necessary.
In the change event, after changing the format on the month tabs, call another sub, and pass the color index, tab name, and day where the format was applied. In that sub, use the Find method to set the range on the 2008 tab where the tab name is found as part of the month name (e.g., the "Jan" in "January"). Then extend that range to include the whole month. Then find the day number among the month dates, and apply the same color index.
Hear are a few lines of the code that goes in a code module:
Also, Noob gave you a great start. Using the worksheet change event requires that you copy the code to each worksheet module. Here's a different way that you would use in the ThisWorkbook module and it handles all the monthly sheets.
Note that it includes a call to the new sub.
Bookmarks