Macro to Show Conditional Formatting Criteria

[Paul Black]

Hi Everyone,

Does anyone have a Macro that will List Cell References that have
Conditional Formatting along with the Conditional Formatting Formulas,
Colour, Font, Borders etc.

Thanks in Advance
All the Best
Paul

 

[Tom Ogilvy]

Dim rng as Range
Dim cell as Range
Dim cond as FormatCondition
On Error Resume Next
set rng = Cells.SpecialCells(xlCellTypeAllFormatConditions)
On Error goto 0
if not rng is nothing then
for each cell in rng
for each cond in cell.FormatConditions


next
Next
End if



you can get the rest of the information from the FormatConditions Object.
look in excel VBA help for details

 

[Paul Black]

Thanks Tom,

I will have a look at it over the weekend and try to figure out the
rest in order to get it to list the required information.
Thanks again.

All the Best
Paul