Finding

This will display a list of all the ranges in the active workbook that contain conditional formatting

Sub ListAllConditionalFormats() 
Dim oWsh As Worksheet 
Dim oFormatCondition As FormatCondition 
Dim lwshcount As Long 
Dim lcount As Long 

    For lwshcount = 1 To ActiveWorkbook.Sheets.Count 
        Set oWsh = Sheets(lwshcount) 
        For lcount = 1 To oWsh.Cells.FormatConditions.Count 
            Set oFormatCondition = oWsh.Cells.FormatConditions(lcount) 
            
            Debug.Print oWsh.Name & " - " & oFormatCondition.AppliesTo.Address 
        Next lcount 
    Next lwshcount 
End Sub