Vytvoř si makro, kam nasázíš buňky a požadovanou barvu. Barvu přitom můžeš zadat třemi různými způsoby. Příklad takového makra:

Sub Makro1()
  Range("B2").Interior.Color = RGB(80, 120, 80)  ' Barva zadaná jako RGB
  Range("B3").Interior.Color = vbGreen           ' Barva zadaná konstantou
  Range("B4").Interior.ColorIndex = 3            ' Barva zadaná indexem
End Sub