|
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail | |||||||
| Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
||||
 |
|
|
|
Опции темы | Поиск в этой теме |
02.04.2009, 14:11
|
#1 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
Помогите собрать таблицу из нескольких файлов
Имеется n-количество файлов (10-30 шт) *.csv (можно и *.xls). Все они имеют одинаковый формат: столбец А - Наименование, столбец В - Количество, столбец С - Артикул. Требуется создать таблицу такого же формата, собранную из этих файлов. Условие: во всех файлах сравниваются ячейки А и С. При совпадении, значения столбца В суммируются. В итоге должна получится таблица с общим количеством неповторяющихся Наименований и их Артикул. Хотелось бы макросом. Заранее спасибо
|
|
|
|
02.04.2009, 16:29
|
#2 |
|
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
Прикрепите к сообщению свои *.csv - файлы
и таблицу excel (пример того, что должно получиться) Никто не будет воссоздавать эту кучу файлов только ради проверки макроса ... |
|
|
|
|
02.04.2009, 16:52
|
#3 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
вот примеры файлов. Но следует учесть, что строк наименований будет гораздо больше. и очень важно сравнивать столбцы А и С, как я писал ранее. Спасибо огромное заранее
|
|
|
|
|
02.04.2009, 16:58
|
#4 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
Возможено расположить все таблицы из *.csv файлов в одном файле на одном листе в столбик
|
|
|
|
|
07.04.2009, 08:37
|
#5 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
Товарищи программеры, я, конечно, дико извиняюсь. Но, насколько я знаю, проблема, которую я описал, решается довольно просто. Просто мне не хватает навыков и знаний программирования. Так почему же вы просто напросто игнорируете отдельных пользователей?
|
|
|
|
|
07.04.2009, 11:21
|
#6 |
|
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Посмотрите вложение. Запустите макрос "Main". Укажите папку с файлами.
Условия: 1. Обрабатываются все файлы из указанной папки с расширением ".csv". 2. Ни один из них не должен быть открыт.
Чем шире угол зрения, тем он тупее.
|
|
|
|
|
08.04.2009, 11:00
|
#7 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
Не читайте это сообщение
Последний раз редактировалось repka; 08.04.2009 в 11:13. |
|
|
|
|
08.04.2009, 11:10
|
#8 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
Следовал инструкциям выше. Excel выдает ошибку:
Run-time error '1004': Application-defined or object-defined error Ошибка в строке: a = .Range(.[A1], .Cells(Rows.Count, "C").End(xlUp)).Value |
|
|
|
|
08.04.2009, 11:30
|
#9 |
|
Старожил
Регистрация: 05.12.2007
Сообщений: 4,180
|
Сказать ничего не могу. Скопировал вложенные в пост № 6 файлы, разархивировал, открыл файл "Сводная таблица.xls", запустил макрос "Main", на предложение "Укажите рабочую папку" выбрал папку "Файлы" (из вложения). Никто ошибку не выдал.
Значит что-то у Вас не так. Вслепую невозможно предполагать. Прикрепите проблемный файл (фрагмент файла), при обработке которого возникает ошибка. С файлам ".csv" есть много тонкостей.
Чем шире угол зрения, тем он тупее.
|
|
|
|
|
08.04.2009, 11:48
|
#10 |
|
Пользователь
Регистрация: 02.04.2009
Сообщений: 10
|
При запуске макроса все равно выдает ошибку (и на другом компе тоже). Результатом действия макроса является файл:
|
|
|
|
|
|
Похожие темы
|
||||
| Тема | Автор | Раздел | Ответов | Последнее сообщение |
| Свод нескольких файлов Excel в один | Стасон | Microsoft Office Excel | 2 | 24.02.2009 11:13 |
| Проигрывание нескольких файлов | <-=SG=-> | Общие вопросы Delphi | 3 | 11.10.2008 15:47 |
| Слияние нескольких wav файлов | lacost | Мультимедиа в Delphi | 1 | 30.09.2008 19:25 |
| открытие нескольких файлов | valyan | Общие вопросы Delphi | 10 | 17.07.2008 20:27 |
| Копирование нескольких файлов + ProgressBar | AngelOfDeath | Общие вопросы Delphi | 4 | 28.05.2008 14:57 |
