В xls файле порядка 5000 строк, обращаюсь к строкам в цикле таким способом:
СтруктураДанных.Операция = СокрЛП(Ex.Cells(НС,2).Value);
           СтруктураДанных.МестоЗаправки = СокрЛП(Ex.Cells(НС,4).Value);
           СтруктураДанных.ВидТоплива = СокрЛП(Ex.Cells(НС,8).Value);
           СтруктураДанных.Кол = СокрЛП(Ex.Cells(НС,9).Value);
           СтруктураДанных.Сумма = СокрЛП(Ex.Cells(НС,10).Value);
           СтруктураДанных.Лимит = СокрЛП(Ex.Cells(НС,11).Value);

Замер производительности показал что каждое обращение в итоге занимает по 11 секунд, есть ли способ по другому обращаться к ячейкам файла, чтобы оптимизировать скорость?

запросом

скопировать. вставить в табличный документ 1с. читать его

диапазонами читать надо, так быстрее

(3) Это как?

(1) в 8.1 можно запросом обращаться к файлу? оО

(2) Так быстрее будит?

вот выбирай: Книга знаний: v8: Быстрый вывод данных в Excel по OLE с помощью COMSafeArray.

+(7) там вообще для вывода, но для чтения в принципе аналогично.

(7) Во, 1 вариант то что мне нужно)

+(9) Спасибо, буду чаще заглядывать в книгу знаний.

(0) тут надо шамана Маню звать,он гуру по загрузкам из екселя

(7) А как в первом варианте считать, а не загрузить в xls?

(11) Так его наверное не так просто вызвать)

Ну наверна вот так:
МассивКОМ = Ексель.Range(Ексель.Cells(1,1), Ексель.Cells(ВсегоСтрок,ВсегоКолонок)).Value;
;-)

+(14) ну а с МассивКОМ потом гляди чего делать в отладчике. Это будет COMSafeArray.

(15) Спасибо большое)

Скрипт = Новый COMОбъект("MSScriptControl.ScriptControl");
Скрипт.language = "javascript";

ВремяНачала = Формат(Скрипт.eval("new Date().getTime()"),"ЧГ=0");
Эксель = ПолучитьCOMОбъект("c:\delado.xls");
ЛистЭксель = Эксель.WorkSheets(1);
ВсегоСтрок = ЛистЭксель.Cells.SpecialCells(11).Row;
ВсегоКолонок = ЛистЭксель.Cells.SpecialCells(11).Column;

Сообщить("Колонок: "+ Строка(ВсегоКолонок) + " Строк: "+ Строка(ВсегоСтрок));

ТЗ =  Новый ТаблицаЗначений;
Для Счетчик = 1 По ВсегоКолонок Цикл
  ТЗ.Колонки.Добавить("Колонка"+Счетчик);
КонецЦикла;

Для Счетчик = 1 По ВсегоСтрок Цикл
  НоваяСтрока = ТЗ.Добавить();
КонецЦикла;

Область = ЛистЭксель.Range(ЛистЭксель.Cells(1,1), ЛистЭксель.Cells(ВсегоСтрок,ВсегоКолонок));
Данные = Область.Value.Выгрузить();

Для Счетчик = 0 По ВсегоКолонок-1 Цикл
  ТЗ.ЗагрузитьКолонку(Данные[Счетчик], Счетчик);
КонецЦикла;
ЛистЭксель = Неопределено;
Эксель = Неопределено;

ВремяОкончания = Формат(Скрипт.eval("new Date().getTime()"),"ЧГ=0");
ОчиститьСообщения();
Сообщить("Выполнение скрипта заняло: " + Строка(ВремяОкончания - ВремяНачала) + " мсек. " + Символы.ПС +
     "Обработано строк: " + Строка(ВсегоКолонок) + " колонок: " + Строка(ВсегоСтрок) + " итого ячеек; " + Строка(ВсегоКолонок * ВсегоСтрок));

Вот такой метод сократил время считывания с 70 секунд до 5 секунд

ADODB.Connection

ADODB.Recordset

У нас побит рекорд.
Прайс в 1 миллион строк
http://subsystems.ru/bitrix/components/bitrix/forum.interface/show_file.php?fid=1831

селект сделать

ADODB  увеличивает скорости напорядок + не нужен exel

(22) а если у меня Линукс сервер.

(22) нужен. Без установленного екселя нет такого источника данных

(23) и как тогда ты поступаешь?

(25) прямая компонента которая читает все форматы экселя, без экселя, без адо и вообще без всего.

(23) в условиях не было

(25) где ты тут видишь com объект Exel? иногда лучше жевать, чем говорить:

   //Создание объекта для установки связи с источником данных
   Connection = Новый COMОбъект("ADODB.Connection");
   //сформируем строку подключения
   //Если необходимо в дальнейшем оперировать цифровыми значениями колонок,то ставим признак HDR = NO
   //если необходимо производить загрузку с учетом псевдонимов в 1й строке,то ставим HDR = YES
   СтрокаПодключения = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = "+ПутьКФайлу;
   СтрокаПодключения = СтрокаПодключения + "; Extended Properties = "+"""Excel 8.0"+";HDR=NO;IMEX=1"";";
   //подключение к источнику данных
   Попытка
       Connection.Open(СтрокаПодключения);
   Исключение
       Сообщить(ОписаниеОшибки());
       Возврат Неопределено;
   КонецПопытки;    
   
   //создание объекта выполнения команды
   Command = Новый COMОбъект("ADODB.Command");
   //создание объекта подключения к файлу
   axCatalog = Новый COMОбъект("ADOX.Catalog");
   axCatalog.ActiveConnection = Connection;
   //получим листы документа,
   //для обработки колонок листа можно обратится к коллекции Лист.Columns,которую тоже можно обойти посредством цикла Для каждого  

   СписокЛистов = Новый СписокЗначений;
   КоличествоКолонок = 0;
   Для каждого Лист ИЗ axCatalog.Tables Цикл
       
       ТекстЗапросаКолонки = "";
       Если Лист.Columns.Count() > 5 Тогда
           Для к = 1 По Лист.Columns.Count() Цикл
                   //Если к=3 тогда
                   //    ТекстЗапросаКолонки = ТекстЗапросаКолонки +?(ТекстЗапросаКолонки="","F"+Формат(к,"ЧЦ=15; ЧГ=0")+"",",'F"+Формат(к,"ЧЦ=15; ЧГ=0"))+"'";
                   //Иначе
                       ТекстЗапросаКолонки = ТекстЗапросаКолонки + ?(ТекстЗапросаКолонки="","F"+Формат(к,"ЧЦ=15; ЧГ=0"),",F"+Формат(к,"ЧЦ=15; ЧГ=0"));
                   //КонецЕсли;
           
           КонецЦикла;
           
           СписокЛистов.Добавить(Лист.Name,ТекстЗапросаКолонки);
           КоличествоКолонок = к - 1;
           Прервать;
       КонецЕсли;
       
   КонецЦикла;
   
   
   //Создание объекта набора записей
   RecordSet = Новый COMОбъект("ADODB.RecordSet");
   //Указание активного соединения
   Command.ActiveConnection = Connection;
   //получим количество строк в документе
   Command.CommandText = "SELECT COUNT(*)FROM ["+СписокЛистов[0].Значение+"]";
   //определение типа команды
   Command.CommandType = 1;
   //Выполнение и получение набора данных
   RecordSet = Command.Execute();
   //первая запись это количество
   КоличествоСтрок = RecordSet.Fields(0).Value;
   //опредлеление текста команды
   Command.CommandText = "SELECT "+СписокЛистов[0].Представление+" FROM ["+СписокЛистов[0].Значение+"]";
   
   //для корректного конвертирования даты немного исправим запрос для поля f3
   Command.Commandtext = СтрЗаменить(Command.Commandtext, "F3", "Format(F3,'yyyymmdd')");
   Command.Commandtext = СтрЗаменить(Command.Commandtext, "F4", "Format(F4,'hh:nn')");

   //определение типа команды
   Command.CommandType = 1;
   
   //Выполнение и получение набора данных
   Попытка
       RecordSet = Command.Execute();
   Исключение
       Сообщить(ОписаниеОшибки());
   КонецПопытки;

(24) Можно скачать за бесплатно.

Provider=Microsoft.Jet.OLEDB.4.0 с win xp по умолчанию

(0) попробуй Range вместо cells или даже Range.Cells
смутно припоминаю, что какой-то из этих вариантов давай кипучий скачек производительности

(20) Если бы оно ещё с такой же скоростью в 1С создавалось...

(32) Пиши напрямую используя булки

(22) фуфло