Macro to find formulas

[saskin23]

I'm trying to write a macro that will search a range of cells and change the background to red for cells that contain a formula. The following code will work for an entire sheet:

Please Login or Register  to view this content.

Here is where it gets interesting:
In column A of my data I have dates. I would only like to change the background to red for cells that have dates earlier than Today(), and only in certain columns. For example, column A has all the dates from Jan 1, 2005 - April 1, 2005 (in order). Today is Jan 10, 2005 (row 10), and there are formulas in columns B-E in, above, and below row 10. I would like to highlight the formulas that are in rows 1-9, and columns D-E. So any formulas in columns B-C would stay as they are, and any formulas in row 10+ would stay as they are, but the cells with formulas in the range D1:E9 would have a red background.

Please help!

Steve

[saskin23]

Obviously the code above would highlight the cells without a formula red--just change the "False" to "True"