Apply formula in a cell if a condition is met

[lifesgood]

Hi,

I need a macro that will apply the below mentioned formula in column J if the value of a cell in column C is "Hits_US" and the value of a cell in column D is "harry". Below is the formula
=((Column G*32)+(Column H*28)+300)/60
Please note that there will be other values in column J. So, only if the condition is met, the formula has to be applied.
I tried to do this in parts. I first tried to multiply the value in column G by 32. But it did not work.
For i = 1 To 10 If Sheets(1).Range("C" & i).Value = "Hits_US" And Range("D" & i).Value <> "harry" Then Cells(i, 10) = Cells(i, 7) * 32 End If Next i
Can anyone help me with this? Any help would be greatly appreciated! Thanks!

 

[louisH]

Hi,

I don't see why this wouldn't work :

[FONT=Arial][COLOR=#242729]For i = 1 To 10 

If Range("C" & i).Value = "Hits_US" And Range("D" & i).Value <> "harry" Then
 Range("J" & i).Value = (((Range("G" & i).Value * 32) + (Range("H" & i).Value * 28))+300)/60
 End If

 Next i[/COLOR][/FONT]