Задача: Есть «центр» и «регионы». Регионы регулярно делают отчеты по представительствам и пересылают их в центр. В каждом регионе несколько сотрудников. Отчеты они делают в MSExcelжесткой структуры. Задача центра собрать эти отчеты в один файл и далее анализировать успеваемость регионов. Данные обработки делают консолидацию всех файлов регионов и вычитание более раннего из более позднего файла.
Данные обработки представлены с открытым кодом. Заточены они под конкретные условия. Универсальными не являются. Полезны будут программистам, решающим подобную задачу.
Сначала в обработке идут функции и процедуры работы с екселем, авторство которых я себе не присваиваю. Были найдены в интернете году эдак в 2005. Но очень сильно выручали много раз. Мои процедуры крайние cнизу.
Процедура Конструктор() Процедура Деструктор() Функция Закрыть() Экспорт Функция Сохранить() Экспорт Функция ПоказыватьПредупреждения(Режим) Экспорт Функция ПоследняяОшибка() Экспорт Процедура ОчиститьОшибку() Экспорт Функция КоличествоЛистов() Экспорт Функция УстановитьЛист(Номер) Экспорт Функция ТекущийЛист() Экспорт Функция ИмяЛиста() Экспорт Функция Загрузить(ИмяФайла,ОбновлятьСсылки=0,ТолькоЧтение=0) Экспорт Функция ПоследняяКолонка() Экспорт Функция ПоследняяСтрока() Экспорт Функция ПолучитьЗначениеЯчейки(Стр, Кол) Экспорт Функция УстановитьЗначениеЯчейки(Стр,Кол,Значение) Экспорт Функция ПолучитьТекстЯчейки(Стр, Кол) Экспорт Функция ЗагрузитьЛист(Заголовок=0) Экспорт Функция ЗагрузитьДиапазон(СтрНач, КолНач, СтрКон, КолКон) Экспорт Функция ПолучитьСписокЛистов() Экспорт Функция УбратьПустыеКолонки(ТЗшка) Экспорт Процедура ВыборКаталога(КаталогОтч) Процедура ВыборФайла(ИмяФайла, Фильтр="xls") Процедура УстанвоитьРекв(ИмяРекв, ИмяСпр, Значен) Процедура ЗагрузитьТаблМенедж() Процедура ВыгрузитьОтчет()