Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.11.2009, 07:53   #1
serd
 
Регистрация: 18.11.2009
Сообщений: 5
По умолчанию Объединить файлы в один с выборкой данных

Добрый день.
В папке есть около 3000 файлов по 1 листу в каждом (одинаковые таблицы,только данные разные).
Возможно макросом объединить их все в одну книгу (Сводная), но выбрать из этих файлов только те данные которые указаны в сводной?

Возможно ли это?
Если да помогите написать макрос.
Спасибо.
Файлы для примера и сводная в архиве.
Вложения
Тип файла: rar Пример.rar (92.2 Кб, 23 просмотров)
serd вне форума Ответить с цитированием
Старый 19.11.2009, 14:03   #2
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Во вложении отдельная программа для обработки Ваших файлов.
Все файлы ,с которых надо взять выборку,поместить в отдельную папку,запустить Сборщика указать папку, в папке с программой результат обработки.
На 600 файлов уходит порядка 15 секунд.
Во время инсталяции программы,инсталятор проверяет наличие версии Microsoft.NET Framework v2.0.50727,если ее нет,предложит загрузить с интернета,ссылка имеется-порядка 27 метров

Если такой вариант устроит,а я думаю, что 3000 файлов в одной папке не храните,усовершенствую для сбора данных с любого количества папок
Вложения
Тип файла: rar Сборщик.rar (718.3 Кб, 42 просмотров)
Анализ,обработка данных Недорого

Последний раз редактировалось doober; 19.11.2009 в 17:03. Причина: Добавление информации
doober вне форума Ответить с цитированием
Старый 20.11.2009, 06:21   #3
serd
 
Регистрация: 18.11.2009
Сообщений: 5
По умолчанию

Спасибо большое! программа работает.
Но как сделать экспорт из программы в Excel если я просто все выделяю и копирую в сводную то у меня вместо русских букв появляются иероглифы.
Вообще есть папка упаковочные листы в ней 499 папок файлов всего в них 2799.Количество файлов и папок каждую неделю растет.
Я потом в общей сводной функциями, формулами сделаю выборку что отгружено, что в изготовлении и т.д.
Можно еще добавить вот эти колонки
Dimensions/Габаритные размеры
Main Description/ Наименование узла
Reguisitiion No/ №заявки
Piece/Pieces/Место / Всего мест
Package No/ №упаковки
и чтобы №упаковки ставился напротив всех позиций из поля Description/Наименование если можно

Последний раз редактировалось serd; 20.11.2009 в 09:02.
serd вне форума Ответить с цитированием
Старый 20.11.2009, 11:30   #4
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

А в выходном файле Сборщик результат.xls отображается нормально?

Это все сделаю,но при копировании в другую книгу у меня все отбражается русскими буквами.
Сделайте образец Сводная,я в него буду экспортировать данные,время экспорта возрастет.
Образец заполните на примере двери,где много позиций,чтобы потом не переделывать.Чем быстрее сделаете,тем быстрее получите результат
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 20.11.2009, 13:58   #5
serd
 
Регистрация: 18.11.2009
Сообщений: 5
По умолчанию

я не посмотрел сразу что итоговый файл есть в папке PCA там нормально

Последний раз редактировалось serd; 20.11.2009 в 14:02.
serd вне форума Ответить с цитированием
Старый 20.11.2009, 14:15   #6
serd
 
Регистрация: 18.11.2009
Сообщений: 5
По умолчанию

вот образец сводной
Вложения
Тип файла: rar сводная пример.rar (10.4 Кб, 22 просмотров)
serd вне форума Ответить с цитированием
Старый 20.11.2009, 14:56   #7
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

К вечеру ждите,сейчас нет времени
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 20.11.2009, 20:21   #8
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

При выборе папки выбирайте каталог в котором хранятся подпапки,все документы каталога будут обработаны.
Шаблон не меняйте.Выходной файл в папке с программой.Что не так,пишите на мыло,нажмете Написать письмо.
Вложения
Тип файла: rar Сборщик.rar (567.9 Кб, 38 просмотров)
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 21.11.2009, 11:35   #9
serd
 
Регистрация: 18.11.2009
Сообщений: 5
По умолчанию

Спасибо!
Вроде все работает
serd вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как можно объединить два массива в один новый? sqwerty Общие вопросы C/C++ 3 11.06.2009 23:50
Слить-объединить несколько файлов в один SLP Microsoft Office Excel 2 19.11.2008 18:13
Как объединить два массива в один. TheWanderer Общие вопросы C/C++ 2 10.11.2008 00:15
два запроса, которые нужно объединить в один. andrianov123 БД в Delphi 4 16.05.2008 16:06
Объединить в один файл asale Microsoft Office Excel 2 12.02.2008 13:18