Hi,

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


Mike

"Code Numpty" wrote:

Is there a way in which to find all cells on a worksheet that have
conditional formatting applied to them?