formularR1C1 if statement

[bradyj7]

Hi all,

I'm trying to write an if statement for the formulaR1C1 function, to do the following:

In column Q do the following

Check the values in column P, if they are negative then multiply them by 0.6, or else just copy them column Q.

I think the code is something like this

Range("q3:q" & LastRow).FormulaR1C1 = "=if(rc[-1]<0, rc[-1] * .6 

else rc[-1]"

Appreciate the help

 

[Norie]

You just seem to be missing the last part of the formula - the code itself is right.

Range("q3:q" & Lastrow).FormulaR1C1 = "=if(rc[-1]<0, rc[-1] * .6, rc[-1])"