Hi,
Welcome to the forum!
Maybe this
Right-click in sheet-tab; pick View Code; paste the code below in the right-panel
Code:Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("B:B")) Is Nothing Then If Target.HasFormula Then Target.Interior.Color = xlNone Else Target.Interior.Color = vbRed End If End If End Sub
HTH
M.
If Target.HasFormula Then
Target.Font.Color = RGB(165, 0, 63)
End If
But, it would be better if all my new workbook that I create look like this (formulas in color) without do anything anymore. Could be this possible??? Thanks