Спасибо. На файловой версии хорошо и быстро загрузилось. Но вот возникла проблема при чтении файла на клиент-серверной версии... т.к. файл расположен локально , а чтении идет на сервере... то на сервере по указанному пути файл не обнаруживается... , да ко всему прочему добавляем , что не на всех серверах установлен эксель. так что немного изменил 2 процедурки... на вот такое содержание и все взлетело.
&НаКлиенте
Процедура ЧтениExcelФайла(ПутьКФайлу)
Эксель = Новый COMОбъект("Excel.Application");
Эксель.WorkBooks.Open(ПутьКФайлу);
Лист = Эксель.Sheets(3);
ВсегоКолонок = Лист.Cells(1,1).SpecialCells(11).Column;
ВсегоСтрок = Лист.Cells(1,1).SpecialCells(11).Row;
Область = Лист.Range(Лист.Cells(2,1), Лист.Cells(ВсегоСтрок,ВсегоКолонок));
Данные = Область.Value.Выгрузить();
// т.к. нельзя передавать таблицу значений с клиента на сервер то придется все делать на сервере =)
СоздатьЗАгрузить(ВсегоКолонок,ВсегоСтрок,Данные);
КонецПроцедуры
&НаСервере
Процедура СоздатьЗАгрузить(ВсегоКолонок,ВсегоСтрок,Данные)
ТЗ = Новый ТаблицаЗначений;
Для Счетчик = 1 По ВсегоКолонок Цикл
ТЗ.Колонки.Добавить("Колонка"+Счетчик);
КонецЦикла;
Для Счетчик = 1 По ВсегоСтрок Цикл
НоваяСтрока = ТЗ.Добавить();
КонецЦикла;
Для Счетчик = 0 По ВсегоКолонок-1 Цикл
ТЗ.ЗагрузитьКолонку(Данные[Счетчик], Счетчик);
КонецЦикла;
СоздатьЭлементСправочника(ТЗ);
КонецПроцедуры
Показать