COMОбъект ("Excel.Application"); #397695

Подскажите, кто работал с методами экселя: Например, имеется огромное число файлов Excel Задача: нужно перебрать все файлы в каталоге, зайти в каждый из них и считать информацию из нужной ячейки. Работает очень медленно. Если выкидываю строку XL = Новый ComОбъект("Excel.Application"); перед циклом, работает несколько быстрее, но все равно не так как хотелось бы. возможно, я как-то неправильно использую методы Excelя и можно изменить код и этим реально увеличить скорость обработки?

сом - он вообще не быстрый...

Не надо открывать/закрывать Excel для каждого файла. Можно просто закрывать книгу.

напиши как - я не силен в excel

Книга.Close

в начале цикла должна соответствовать строка закрытия файла ТекФайлXLS.ПолноеИмя в конце цикла, т.к. видимо в екселе продолжают висеть открытые в предыдущих шагах цикла файлы. подскажите, как это сделать. :-) спасибо Rie, пока я писал сообщение - пришел ответ. буду сейчас тестировать

не помогает. с каждой секундой excel жрет больше и больше памяти

Сейчас цикл выглядит так?

а зачем каждый раз новый ком объект создавать? ИМХО гарбаж коллектор не успевает гoвно за этим кодом убирать... надо всем начинающим программистам в сях тренироваться с маллоком - может тогда и понимать что-нить начнут...

+111!

у меня XL.Quit перед окончанием цикла, а не после него, а остальное так

com создаю только один раз.

+ тока можно еще Книга = 0; и XL = 0 вставить в соответствующие места

Убери XL.Quit из цикла. В цикле - только читаешь из Excel или что-то туда пишешь?

Если создаёшь какие-то переменные, ссылающиеся на листы, ячейки и т.д. - зануляй их, как сказано в , внутри цикла (кроме самого XL, разумеется - он будет нужен до окончания цикла)

советую перейти на ADO и проблемм не будет

вроде так все и делаю, а смотрю в момент выполнения кода на процессы - эксель продолжает увеличивать пожираемую память..

Через несколько итераций выводи посмотри значение XL.Workbooks.Count - может, книги всё же не закрываются? Или воспользуйся .

Книги закрываются, не могу понять, почему жрет память?

Что значит "жрёт память"?

может немного смягчит

что такое 0, -1 жрет память - смотрю в диспетчере задач, процессы, excel.exe, в колонке память постоянно увеличивается значение (сейчас, например 146 000 Кб)

я, наверное, уже надоел, но почему все-таки такая фигня?

ни разу не смягчает

люди, помогите...

может, пауза поможет?

ну, и экстремальный вариант scr = СоздатьОбъект("WScript.Shell");

пауза позволит снизить нагрузку на память, но как может от этого увеличиться скорость

прошу помочь.

на процессор. гарбадж коллектору время даем.

+ да и не скорость увеличиваем, а памяти потребление уменьшаем... по крайней мере мне так казалось..

не помогает...

а кроме этого кода есть что-нить еще, что с XL работает?

нет

Память будет "жраться" из-за того, что Excel открывает книги. При этом, если даже книгу тут же закрывают, то "умный" Excel не сразу освобождает память. Также надо понимать, что OLE - очень медленная система. Поэтому, проще выбор написать в сценарии Excel, в Workbook_OnOpen в специальной книге, которую будут вызывать при открытии, а уже из этой книги можно будет перебрать все файлы Excel, так как всё это будет исполняться в рамках одного процесса и без торможений OLE при вызове RPC-методов. Попробуйте - разница очень ощутима.

Попробуй через ADO

для успокоения можешь создавать все время новый объект точно не будет "жрать"

Вот только в восьмерке евал вроде както не так возврат делает

благодарю всех, завтра попробую все способы. потом отпишу, что получилось

как на vba в ексель будет выглядеть макрос, который выбирает .xls - файлы из указанного каталога, заходит в каждый и считывает например значение ячейки А1? че то второй день пытаюсь написать (я мало знаком с vba), но без толку. Подскажите, кто в теме

что, никто не в теме? или еще не проснулись?

do while файл<>"" файл=dir loop но - Зачем ? (с)

хочу проверить совет  Torquader а можно подробнее я что-то в коде не наблюдаю как открываются файлы эксель, и с соответствующего листа из соответствующей ячейки берется нужное значение. к тому же xl файлы нужно выбирать из всех подкаталогов данного каталога

ну это извините, Вы просили перебор - получите - распишитесь если все паришься с заемом памяти делай и не парься, если евал возвращает строку то и это решается за недорого

ты попробуй вручную открыть 30 или 40 файлов - быстро они у тебя будут открываться или медленно?