This will produce a list of addresses with conditional formats in column A.
Right click your sheet tab, view code and paste it in.
Sub marine()
x = 1
Set myrange = Cells.SpecialCells(xlCellTypeAllFormatConditions)
For Each c In myrange
Cells(x, 1).Value = c.Address
x = x + 1
Next
End Sub