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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 15.09.2011, 17:15   #21
Dexter_M
Пользователь
 
Регистрация: 13.09.2011
Сообщений: 29
По умолчанию

Спасибо огромное!
Постораюсь проверить как можно быстрее, но на этой неделе уже не получится, ибо уезжаю...
В понедельник первым делом с утра.
Еще раз огромное Вам СПАСИБО!!!
Dexter_M вне форума Ответить с цитированием
Старый 15.09.2011, 17:49   #22
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Т.К. "у мя таких файло по всем регионам Росси по 140 штук" - можно начальству сказать, что месяц считать буду, а сам скриптом за минуту сделал и в Турцию
А может уже в Турции? До понедельника - день уже сэкономлен
Только скрипт доработать, чтоб файлы брал из разных вложенных папок и под именами папок сохранял...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 19.09.2011, 09:10   #23
Dexter_M
Пользователь
 
Регистрация: 13.09.2011
Сообщений: 29
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Т.К. "у мя таких файло по всем регионам Росси по 140 штук" - можно начальству сказать, что месяц считать буду, а сам скриптом за минуту сделал и в Турцию
Ну примерно так и планировал) сэкономить недельку и на отдых)
Спасибо еще раз)))
Dexter_M вне форума Ответить с цитированием
Старый 19.09.2011, 14:30   #24
Djeki
Форумчанин
 
Регистрация: 24.01.2011
Сообщений: 136
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Т.К. "у мя таких файло по всем регионам Росси по 140 штук" - можно начальству сказать, что месяц считать буду, а сам скриптом за минуту сделал и в Турцию
А может уже в Турции? До понедельника - день уже сэкономлен
Используя Ваши скоростные макросы уважаемый Hugo121, такой вариант отдыха, сам напрашивается. Спасибо Вам за помощь и обучение всем тонкостям и тайнам VBA..
Djeki вне форума Ответить с цитированием
Старый 19.09.2011, 15:35   #25
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию


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

Кстати, у меня по соседству раньше так делали - распечатывали текстовик и по линеечке с калькулятором делали выборку по позициям... в готовую форму в Эксель.
Каждый день.
Не выдержал, помог - хотя это и не моя работа, но больше некому - IT заняты важными делами...
И сделал примерно как тут - текст в массив, анализ, выгрузка результата в Эксель на свои места (форму не менял).
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 23.09.2011, 09:09   #26
Dexter_M
Пользователь
 
Регистрация: 13.09.2011
Сообщений: 29
По умолчанию

Совсем забыл отписаться о работе данного кода.
Код работает прекрасно! Считает все верно и выдает данные именно втом формате, который необходим!
Огромное спасибо Hugo121!!!
Dexter_M вне форума Ответить с цитированием
Старый 23.09.2011, 11:04   #27
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Только я там в №20 ошибся - вместо
Всё так же - в текст, сохранить как csv:
читать
Всё так же - в текст, сохранить как vbs:

Вот же...
Может быть модераторы могут исправить - мне уже поздно...
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 23.09.2011 в 11:31.
Hugo121 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Авто экспорт из XLS в CSV kir1381 Microsoft Office Excel 6 10.11.2011 00:47
Перенос с xls в csv Fart Microsoft Office Excel 7 24.10.2011 23:11
Вопрос к специалистам: много файлов csv в xls foridi Microsoft Office Excel 1 02.08.2010 05:35
Копирование данных из csv в xls Lenin21 Microsoft Office Excel 0 06.11.2008 21:10
Поиск *.csv и *.xls файлов Len@ Microsoft Office Excel 18 28.07.2008 22:31