Sub Macro1() Cells.SpecialCells(xlCellTypeBlanks).ClearFormats End Sub
Sub Macro2() Cells.SpecialCells(xlCellTypeBlanks).FormatConditions.Delete End Sub