excel - print all conditional formatting rules for a spreadsheet

Question

I would like VBA code to print every condition formatting Rule within a spreadsheet, including Rule Type, Rule Description (formula), Colour and Cell Range that the rule applies to. How do I achieve this?

Answer 1

u can list it like this, quite easily.

Sub ListAllCF()
    Dim cf As FormatCondition
    Dim ws As Worksheet
    Set ws = ActiveSheet
    For Each cf In ws.Cells.FormatConditions
        Debug.Print cf.AppliesTo.Address, cf.Type, cf.Formula1, cf.Interior.Color, cf.Font.Name
    Next cf
End Sub

buts its buggy as certain type cannot be list using this way so you need to trap the error and find other ways to list the errornous type.