Имя: Пароль:
1C
1С v8
Пытаюсь выгрузить из Эксель (300 000 строк) в ТЗ, не пойму почему в ТЗ нет данных... код:
0 SkillUp
 
17.10.18
14:22
Мой код:
Эксель = ПолучитьCOMОбъект(ПолеВвода1);
    ЛистЭксель = Эксель.WorkSheets(1);
    ВсегоСтрок = ЛистЭксель.Cells.SpecialCells(11).Row;
    ВсегоКолонок = ЛистЭксель.Cells.SpecialCells(11).Column;
    
    Сообщить("Колонок: "+ Строка(ВсегоКолонок) + " Строк: "+ Строка(ВсегоСтрок));
    
    ТЗ = Новый ТаблицаЗначений;
    Для Счетчик = 1 По ВсегоКолонок Цикл
        ТЗ.Колонки.Добавить("Колонка"+Счетчик);
    КонецЦикла;
    
    Для Счетчик = 1 По ВсегоСтрок Цикл
        НоваяСтрока = ТЗ.Добавить();
    КонецЦикла;
    
    Область = ЛистЭксель.Range(ЛистЭксель.Cells(1,1), ЛистЭксель.Cells(ВсегоСтрок,ВсегоКолонок));
    Данные = Область.Value.Выгрузить();
    
    Для Счетчик = 0 По ВсегоКолонок-1 Цикл
        ТЗ.ЗагрузитьКолонку(Данные[Счетчик], Счетчик);
    КонецЦикла;
    ЛистЭксель = Неопределено;
    Эксель = Неопределено;
    
    ОчиститьСообщения();
    
    Возврат ТЗ;
1 N-S-B
 
17.10.18
14:26
Скорее всего данные просто подгружаются. Проверь что в ТЗ.Количество()
2 segn
 
17.10.18
14:27
(0) Данные = Область.Value.Выгрузить(); - разве это массив?
3 RomanYS
 
17.10.18
14:28
Посмотреть отладчиком содержание Данные и Данные[Счетчик]
4 RomanYS
 
17.10.18
14:31
ТД = Новый ТабличныйДокумент;
    ТД.Прочитать(ИмяФайла, СпособЧтенияЗначенийТабличногоДокумента.Текст);// эксель файл
    
    Построитель = Новый ПостроительЗапроса;
    Построитель.ИсточникДанных = Новый ОписаниеИсточникаДанных(ТД.Область());
    
    ТЗ = Построитель.Результат.Выгрузить();
5 13_Mult
 
17.10.18
14:35
(0) Прочитай внимательнее http://catalog.mista.ru/public/20090/
6 МихаилМ
 
17.10.18
14:36
getrows()
7 SkillUp
 
17.10.18
14:41
(3) (4) (5)  Разобрался. Спасибо вам...
8 SkillUp
 
17.10.18
14:42
(6) Отож ...
9 SkillUp
 
17.10.18
17:02
(1) Да, ТЗ.Количество() показывает свыше 300 000 тыс. строк, но что это меняет, ТЗ пустая...