Macro colora cella.

[Statix]

Ciao a tutti,
avrei bisogno di una macro che in base al valore di una cella mi colora la rispettiva cella in riga.
riga di riferimento D3:M3
esempio
in Q5 ho il valore 4 la macro deve colorare la cella H5
in Q6 ho il valore 5 la macro deve colorare la cella I6
e cosi via.
allego foto

[Statix]

OK
spulciando nel forum e con qualche piccolo adattamento ho risolto
con questa macro,

Codice: Seleziona tutto

Sub Colora_Sfondo()
   
    Range("D5:M49").Interior.ColorIndex = 0
   
    For I = 1 To 45
     
      Range("D4").Offset(I, Range("Q" & I + 4)).Interior.ColorIndex = 3
     
    Next I
End Sub

ringrazio tutti.

[wallace&gromit]

ciao,
potevi anche risolvere semplicemente con una formattazione condizionale, con questa formula da inserire in riga 5 + copia / incolla formato nelle altre celle:

Codice: Seleziona tutto

=SE(RIF.COLONNA()-4=$Q5;1;0)