Получите цвет и сделайте подсчет

Question

Я хочу сделать это в C3: C5 - Если другие ячейки (месяцы) имеют зеленый цвет, это займет общее значение минус значение зеленого цвета, и если ячейки красные, ничего не делайте.

Для примера. - Проект 2 - У меня всего 200 и на 01/01/15 есть 1 ячейка с зеленым и другими красными, поэтому она будет 200-100 = 100 (значение)

Проект 3 - у меня всего 300 и 01/02/15 и 01/03/15 имеют зеленый цвет, так что будет 300-100-150 = 50 (в стоимостном выражении)

Я хочу сделать это в VBA, но не нужно

Answer 1

Give это попытка (для зеленого №4):

Sub Roeid() 
    Dim N As Long, i As Long 
    N = Cells(Rows.Count, "A").End(xlUp).Row 

    For i = 2 To N 
     v = Cells(i, "B").Value 
     For Each a In Array("D", "E", "F", "G") 
      If Cells(i, a).Interior.ColorIndex = 4 Then 
       v = v - Cells(i, a).Value 
      End If 
     Next a 
     Cells(i, "C").Value = v 
    Next i 
End Sub