Сomparison-line Голосов: 1 Адрес блога: http://comparison-line.ru Добавлен: 2010-11-26 13:42:23 блограйдером kottx

Добавление строчки после Сальдо nRow=nRow+1

2013-05-07 15:38:31 (читать в оригинале)

* Добавление строчки после Сальдо nRow=nRow+1 oExcel.Range([B]+ALLTRIM(STR(nRow,3))).Select oExcel.ActiveCell.FormulaR1C1=[Итого за месяц] oExcel.Range([C]+ALLTRIM(STR(nRow,3))).Select oExcel.ActiveCell.FormulaR1C1=NachAll * - Фрагмент пропущен oExcel.Range([L]+ALLTRIM(STR(nRow,3))).Select oExcel.ActiveCell.FormulaR1C1=UpPeni oExcel.Rows(ALLTRIM(STR(nRow,3))+[:]+; ALLTRIM(STR(nRow,3))).Font.Size = 7 oExcel.Rows(ALLTRIM(STR(nRow,3))+[:]+; ALLTRIM(STR(nRow,3))).Interior.ColorIndex = 35 oExcel.Rows(ALLTRIM(STR(nRow,3))+[:]+; ALLTRIM(STR(nRow,3))).HorizontalAlignment = xlCenter * Еще одна строчка сводных данных nRow=nRow+1 StartRow=nRow oExcel.Range([A]+ALLTRIM(STR(nRow,3))).Select oExcel.ActiveCell.FormulaR1C1=[На начало месяца]+; [ общее сальдо составляет: ]+; ALLTRIM(STR(SaldoAll,13,2))+[ руб. В т.ч]+; [ Оплата: ]+ALLTRIM(STR(SldRussia,13,2))+; [ [...]