Delete CF fill color, replace with regular fill color. Short code, can't figure it out!

Dim cell As Range
Set r12 = Range(r10.Offset(1), r10.End(xlDown))
For Each cell In r12
If ActiveCell.FormatConditions(1).Interior.Color = 49407 Then
   cell.FormatConditions.Delete
End If
Next

That's the snippet of my code I'm working on (excluded the rest). It obviously doesn't include a line to fill the cell with a red color, so that would need to be added. Basically, I can't figure out how to go through each cell in the range r12, check if the conditional formatting color is 49407, and if it is then delete the formatting out of the cell and fill it with red.