|
0
zladenuw
07.09.11
✎
13:45
|
Есть ТП
Заполняю колонками
// Создание описателя типов для таблицы значений
КЧ = Новый КвалификаторыЧисла(15,2);
КС = Новый КвалификаторыСтроки(50);
Массив = Новый Массив;
Массив.Добавить(Тип("Строка"));
ОписаниеТиповС = Новый ОписаниеТипов(Массив, , КС);
Массив.Очистить();
Массив.Добавить(Тип("Число"));
ОписаниеТиповЧ = Новый ОписаниеТипов(Массив, , ,КЧ);
Если ЭлементыФормы.ТЗДанныхФайла.Колонки.Количество() <> ВсегоКолонок Тогда
лНеобкол = 0;
Пока ЭлементыФормы.ТЗДанныхФайла.Колонки.Количество() <> ВсегоКолонок Цикл
ТЗДанныхФайла.Колонки.Добавить("Колонка"+лНеобкол,ОписаниеТиповС,"Колонка"+лНеобкол);
ЭлементыФормы.ТЗДанныхФайла.Колонки.Добавить("Колонка"+лНеобкол,"Колонка"+лНеобкол);
лНеобкол = лНеобкол+1;
КонецЦикла;
КонецЕсли;
RowCount = ExcelЛист.UsedRange.Rows.Count;
НомерПервойКолонки = 1;
//Создадим таблицу данных для загрузки в нее Екселя
СоздатьТЧДанных();
//Обратаем всю область данных
Область = ExcelЛист.Range(ExcelЛист.Cells(1,НомерПервойКолонки), ExcelЛист.Cells(RowCount,ВсегоКолонок));
Данные = Область.Value.Выгрузить();
//Создание пустых строк по RowCount
Для Счетчик = 1 По RowCount Цикл
НоваяСтрока = ТЗДанныхФайла.Добавить();
КонецЦикла;
//Заполнение Тч данными
Для Счетчик = 0 По ВсегоКолонок-1 Цикл
ТЗДанныхФайла.ЗагрузитьКолонку(Данные[Счетчик], "Колонка"+Счетчик);
КонецЦикла;
ЭлементыФормы.ТЗДанныхФайла.ОбновитьСтроки();
Загружаю в ТЗ данные.
В ТЗ данные есть а вот на форме не обновляется, подскажите где не так.
Заранее спасибо
|
|