Формулу в ячейку

[rebel25]

Скан заполняет вызванный шаблон
....
Excel.ActiveWorkbook.sheets(ppp_).cells(ii_, 5) = @ss:4;
Мне нужно вставить формулу в любом стиле, например

Excel.ActiveWorkbook.sheets(ppp_).cells(ii_, 7).Select;
Excel.ActiveCell.FormulaR1C1 = "=ROUND(RC[-2]*R2C7,0)";

Как ни пробую получаю не понятные ошибки Exception...

Помогите заполнить формулой ячейку листа Excel. Как это делается?

[DUCKKK]

execute ad_prc_open_excel();

local
{
nRow;
};

VB
{
Dim nnRow
Dim cData
};


let nRow := 1;
scan @ss select top 10 id_firm from setup _hintbrowser execute
{
LET
{
VB.nnRow := nRow;
VB.cData := @ss:id_firm[""];
};

VB
{
Sh.Cells(nnRow, 1).Value = cData
Sh.Cells(nnRow, 3).FormulaR1C1 = "=RC[-2]*100/56"
};

let nRow := nRow + 1;
};

[rebel25]

Спасибо, но у меня отчет написан без VB
Единственный выход переписать с VB?

[Вячеслав Ионов]

Я как-то делал примерно так. Лютая чехарда с кавычками, думаю, можно преобразовать Во всяком случае именно такой вариант у меня работал

let _ii_ = _ii - 1;
Let _b = 'E16:E'+_ii_[''];
let ww = char(34)+'=СУММ('+_b['']+')'+char(34);

Excel.ActiveSheet.cells(_ii, 5).Select;
Excel.ActiveCell.FormulaR1C1 = ww;
Excel.ActiveCell.Replace("'","");