|
1 2 |
Ячейка = Лист.Cells(1,8); Ячейка.Formula="=SUM(R11C:R[-1]C)"; |
|
1 2 3 4 5 6 7 8 9 10 11 |
Процедура Сформировать() Перем Кат,Шаб; Ехсел=СоздатьОбъект("Excel.Application"); Книга=Ехсел.Workbooks; Если ФС.ВыбратьФайл(0,Кат,Шаб,"Выбери файл Еxcel",,"*.xls",)=1 Тогда Книга.Open(Шаб+Кат); Ехсел.Range("C1").FormulaR1C1 = "=CONCATENATE(RC[2],R[6]C)"; Книга.Close(); Ехсел=""; КонецЕсли; КонецПроцедуры |
About the Author
