Macro to Show Conditional Formatting Criteria
 

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

Macro to Show Conditional Formatting Criteria
 

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

--
Regards,
Tom Ogilvy


"Paul Black" wrote in message
...
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

Macro to Show Conditional Formatting Criteria
 

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

"Tom Ogilvy" wrote in message ...
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

--
Regards,
Tom Ogilvy


"Paul Black" wrote in message
...
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