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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 07.01.2012, 21:58   #21
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Показывайте исходные тексты и что в итоге хотите получить - именно какой итоговый результат нужен. Т.к. то, что получаете моим макросом - вряд ли итог...
Ну и я тут не один - может быть будут другие варианты, получше.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.01.2012, 09:29   #22
hammerman
Пользователь
 
Регистрация: 03.01.2012
Сообщений: 33
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Показывайте исходные тексты и что в итоге хотите получить - именно какой итоговый результат нужен. Т.к. то, что получаете моим макросом - вряд ли итог...
Ну и я тут не один - может быть будут другие варианты, получше.
Во вложенном файле постарался подробно описать задачу и итог.
Заранее спс!
Вложения
Тип файла: rar Сравнение двух файлов.rar (6.6 Кб, 15 просмотров)
hammerman вне форума Ответить с цитированием
Старый 08.01.2012, 13:53   #23
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Нудная задача, но в общем сделать можно.
Неудобно, что в карте вид операции на две строки разбили...
На счёт овердрафта пример некорректный - где в файлах овердрафт?
Быстро сделать не обещаю, даже вообще не обещаю - т.к. это реально уже работа, а не развлечение...
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 08.01.2012, 14:20   #24
hammerman
Пользователь
 
Регистрация: 03.01.2012
Сообщений: 33
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Нудная задача, но в общем сделать можно.
Неудобно, что в карте вид операции на две строки разбили...
На счёт овердрафта пример некорректный - где в файлах овердрафт?
Быстро сделать не обещаю, даже вообще не обещаю - т.к. это реально уже работа, а не развлечение...
Согласен. В примере самая малость данных. Иногда приходится проверять руками по 40 стр.
Других данных к сожалению нету. Попробуйте условно прописать выборку, а там проверим ее работоспособность.
Конечно я не Рокфеллер, но как минимум респект и уважуху гарантирую. It's a joke. )))
Даже то, что уже Вами предложено как часть решения дает большой толчок в обработке данных. И за это отдельное спс!
hammerman вне форума Ответить с цитированием
Старый 08.01.2012, 22:31   #25
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Сделал в виде скрипта vbs - можно править в блокноте, лучше Notepad++
Для овердрафта только пустой лист подготовил.
Работает в ХР - как будет под другими системами (Вин7), не знаю. Под 2000 точно не пойдёт - перекодировщик из ХР.
Ещё бы добавить проверку, что файлы валидны - сперва найти что-то характерное в файле... Ну это пока всё равно не финальная версия. Но уже сегодня надоело возиться...
Запускать даблкиком по файлу - если не знаете
Вложения
Тип файла: rar work.rar (1.5 Кб, 12 просмотров)
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 09.01.2012, 05:17   #26
hammerman
Пользователь
 
Регистрация: 03.01.2012
Сообщений: 33
Хорошо

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Сделал в виде скрипта vbs - можно править в блокноте, лучше Notepad++
Для овердрафта только пустой лист подготовил.
Работает в ХР - как будет под другими системами (Вин7), не знаю. Под 2000 точно не пойдёт - перекодировщик из ХР.
Ещё бы добавить проверку, что файлы валидны - сперва найти что-то характерное в файле... Ну это пока всё равно не финальная версия. Но уже сегодня надоело возиться...
Запускать даблкиком по файлу - если не знаете
Спс.
Отлично, сегодня проверю.
hammerman вне форума Ответить с цитированием
Старый 09.01.2012, 20:09   #27
hammerman
Пользователь
 
Регистрация: 03.01.2012
Сообщений: 33
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Сделал в виде скрипта vbs - можно править в блокноте, лучше Notepad++
Для овердрафта только пустой лист подготовил.
Работает в ХР - как будет под другими системами (Вин7), не знаю. Под 2000 точно не пойдёт - перекодировщик из ХР.
Ещё бы добавить проверку, что файлы валидны - сперва найти что-то характерное в файле... Ну это пока всё равно не финальная версия. Но уже сегодня надоело возиться...
Запускать даблкиком по файлу - если не знаете
Раздобыл более полные файлы. Пропустил через них скрипт. В отчете выделил красным на листе3.
В новых файлах есть операции с овердрафтами.
Вложения
Тип файла: rar Новые файлы и отчет после их сверки.rar (49.4 Кб, 9 просмотров)
hammerman вне форума Ответить с цитированием
Старый 09.01.2012, 20:37   #28
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Не, с таким файлом карты я отказываюсь работать
Я не могу проверить скрипт - там строки пляшут как попало. Он не мог у Вас сработать на этом файле. Или файл был другой, или архиватор его побил. Проверьте.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 09.01.2012, 21:45   #29
hammerman
Пользователь
 
Регистрация: 03.01.2012
Сообщений: 33
По умолчанию

Цитата:
Сообщение от Hugo121 Посмотреть сообщение
Не, с таким файлом карты я отказываюсь работать
Я не могу проверить скрипт - там строки пляшут как попало. Он не мог у Вас сработать на этом файле. Или файл был другой, или архиватор его побил. Проверьте.
Даже не знаю, что могло быть с файлом "карты". Залил в архив еще раз и перепроверил. Надеюсь теперь с ним все нормально.
Вложения
Тип файла: rar Новые файлы и отчет после их сверки.rar (49.5 Кб, 7 просмотров)
hammerman вне форума Ответить с цитированием
Старый 09.01.2012, 22:34   #30
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Да, глупая ошибка была в коде:
было
Код:
                r(x, 0) = a(i, 0)
                r(x, 1) = a(i, 2)
                r(i, 2) = a(i, 4)
а нужно
Код:
                r(x, 0) = a(i, 0)
                r(x, 1) = a(i, 2)
                r(x, 2) = a(i, 4)
Это 152 строка. Исправьте.
Ну а я овердрафт гляну...
webmoney: E265281470651 Z422237915069 R418926282008

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


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание приложений для обработки массивов anastasiya__S Помощь студентам 0 07.04.2011 20:18
Макрос обработки данных для Excel 2007 Python Фриланс 1 16.02.2010 20:47
надо: макрос для обработки данных poll69 Microsoft Office Excel 2 06.02.2010 17:25
Сопоставление данных в двух таблицахъъъ Tanuki-sensei Microsoft Office Access 3 22.05.2009 09:25
Сопоставление данных в двух столбцах plasticman Microsoft Office Excel 4 12.03.2009 17:45