So, after I posted the above I read one of my older posts. in that post, @pdaldy mentioned using recoding a macro in Excel and bringing it into the VBA. It worked! Thanks again. That is an amazing trick.
The only remaining question, the below code also turns the header (R1) red. Don't want that. ??
Code:
Columns("R:R").Select Selection.FormatConditions.Add Type:=xlCellValue, Operator:=xlGreater, _
Formula1:="=0"
Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
With Selection.FormatConditions(1).Font
.Color = -16383844
.TintAndShade = 0
End With
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 13551615
.TintAndShade = 0
End With
Selection.FormatConditions(1).StopIfTrue = False