Applt Conditional Formatting Result to cells

[mikeymay]

I have a range of cells that contain a number of CF's and I need to remove these but retain the resulting formats.

As the range can cover up to 14 columns and several thousand rows, is there a way of applying the formats at once rather than on a cell by cell basis?

Currently I am using the following

For Each rngCell In rngRange.Cells
   With rngCell
      .NumberFormat = .DisplayFormat.NumberFormat
      .Font.Color = .DisplayFormat.Font.Color
      .Font.Bold = .DisplayFormat.Font.Bold
   End With
Next

Set rngCell = Nothing

rngRange.FormatConditions.Delete

but the NumberFormat line doesn't seem to work. In some cells there is a value that could be more than 2 decimal places but when the CF's are deleted the numbers aren't staying in the 2 DP format.


TIA