Dzięki, to uruchomiło mi zastane klepki w głowie i ogarnąłem. Pewnie można by to zrobić bardziej elegancko i automatycznie, ale mam póki co tylko 4 komórki do sformatowania, więc to wystarcza:

'
' CondF Macro
' Applies conditonal formatting to cells F4-F7
'
'
Sub CondF()
    Range("F4").Select
    If Selection.Value < 0 Then Selection.Font.ColorIndex = 3 Else Selection.Font.ColorIndex = 10
    Range("F5").Select
    If Selection.Value < 0 Then Selection.Font.ColorIndex = 3 Else Selection.Font.ColorIndex = 10
    Range("F6").Select
    If Selection.Value < 0 Then Selection.Font.ColorIndex = 3 Else Selection.Font.ColorIndex = 10
    Range("F7").Select
    If Selection.Value < 0 Then Selection.Font.ColorIndex = 3 Else Selection.Font.ColorIndex = 10
End Sub