The following line in my macro won't work:

ActiveCell.FormulaR1C1 = "=IF(ISERROR(SEARCH(" -
",(RC[-7]))),(RC[-7]),-SUBSTITUTE((RC[-7])," - ",""))"

I have used the ActiveCell.Formula before but on little formulas. I want it
to write a formula in a cell that looks at a cell 7 columns to the left and
determine if it is text or not (imported data from SAP) and if it is text, I
want it to remove the "-" and put as a negative number.

I'm not very knowledgeable about VBA or macros. What I know is from what
I've copied from other recorded macros and pieced together.

Thanks for the help!!