Не получается написать формулу на VBA

[Andrey3055]

Всем доброе утро!
Подскажите, пожалуйста, в чем ошибка:
Я пытаюсь написать условие заполнения столбца №32. При заполнении используется массив.
Если в столбце 1 встречается слово "Акц", то должна работать следующая формула

' ActiveCell.FormulaR1C1 = _
'        "=IF(RC[-9]>50*10^6,IF(ABS(RC[-1])>0.25*(RC[-19]-RC[-18]),25%,0),IF(ABS(RC[-1])>0.25*(RC[-17]-RC[-16]),25%,0))"

Если же не встречается это слово, то если значение в столбце 31 > 0,5, то ставим 25%, иначе "+".

Подскажите, что я делаю не так?
Во-первых ошибку выдает теперь, а во-вторых со значениями из формулы не совпадает. То есть если в столбец 32 поставить формулу

' ActiveCell.FormulaR1C1 = _
'        "=IF(RC[-9]>50*10^6,IF(ABS(RC[-1])>0.25*(RC[-19]-RC[-18]),25%,0),IF(ABS(RC[-1])>0.25*(RC[-17]-RC[-16]),25%,0))"

, то эти значения не совпадут со значениями программы.