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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 18.07.2008, 16:35   #1
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию сравнить тексты

на листе "Текст "
1 столбец новости которые выходят каждый месяц (Архив)
2 столбец спиок этих новостей за год
если текст слева хотябы похож на текст справа
заменить его на тест справа

много опечаток
а таблица в которую потом вставляются эти данные сравнивает только одинаково написанные тексты(иначе выводит не правильно)
на листе "ошибки " показаны те самые опечатки
Вложения
Тип файла: rar SRAVNENIE TEXT.rar (14.5 Кб, 41 просмотров)
olimpus вне форума
Старый 18.07.2008, 20:39   #2
Abrakadabra
Форумчанин
 
Регистрация: 26.04.2008
Сообщений: 487
По умолчанию

Цитата:
Сообщение от olimpus Посмотреть сообщение
текст слева хотябы похож
Довольно-таки расплывчатое понятие.. Для начала нужно четко определить критерии похожести, потом сделать функцию VBA.
Abrakadabra вне форума
Старый 21.07.2008, 08:07   #3
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию

Экономический календарь
Лист " Ошибки "цветом выделена одна новость в разных вариантах ,(ОПЕТАТКИ)
и этот список будет расти так как текст набирается руками

лист "ТЕКСТ"
помогите сравнить два текста с заменой одного на другой ,если он не соответствует шаблону и вывести во вспомогательный столбец
попробовал функцмю просмотр но она подтармаживает
это красным выделено
Зеленым выделено как отлично справляется
1 столбец это архив новостей которые выходят каждый месяц
( каждую новость нужно сравнить с шаблоном(столбец 3 список за год ) и вывести во вспомогательный столбец напротив(столбец 2)
все новости должны выглядеть ( во вспомогательном столбце 2) как в шаблоне (столбец 3 список за год )

2 столбец
прикрутил функцию "просмотр"
#НД это те новости которые не входят в шаблон (не нужны )

3 столбец это список новостей выходящих в течении года(он же шаблон для сравненя текста.)

P S

здесь показаны новости для одной страны (а их 11 )
хотелось бы максимально автоматизиравать процесс проверки и замены
Слабо разбираюсь в Excel , а в VBA вообще ничего не понимаю , если возможно покажите примером
Вложения
Тип файла: rar SRAVNENIE TEXT.rar (15.3 Кб, 23 просмотров)

Последний раз редактировалось olimpus; 21.07.2008 в 14:24.
olimpus вне форума
Старый 21.07.2008, 12:07   #4
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию

После проверки , данные из вспомогательного столбца попадут в таблицу , которая расставляет правильно только те данные
котторые точно равны шаблону

Последний раз редактировалось olimpus; 21.07.2008 в 13:16.
olimpus вне форума
Старый 21.07.2008, 19:01   #5
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию

попробую донести так
помогите решить проблему с опечатками

Лист " Ошибки " цветом выделена одна новость в разных вариантах ,(ОПЕТАТКИ)
и этот список будет расти так как текст набирается руками (но сильно отличаться от оригинала не будут)

Лист "ТЕКСТ" (пытался решить проблему путем сравнения текста и шаблона)
1 столбец это архив новостей которые выходят каждый месяц (С опечатками)
3 столбец это список новостей выходящих в течении года(он же шаблон для сравненя текста.)
2 столбец это вспомогательный столбец (прикрутил функцию "просмотр" )

на примере функции "Просмотр " хорошо видно какой результат нужен

каждую новость (столбец 1)
нужно найти в шаблоне (столбец 3 список за год )
и заменить на шаблон во вспомогательном столбце напротив(столбец 2)

все новости ( во вспомогательном столбце 2) должны выглядеть как в шаблоне (столбец 3 список за год )

Но функция "Просмотр" кое где подтармаживает
след выделен красным

Зеленым выделено как отлично справляется(на сложных участках)

2 столбец
#НД это те новости которые не входят в шаблон


здесь показаны новости для одной страны (а их 11 )
хотелось бы максимально автоматизиравать процесс проверки и замены

если возожно покажите примером
Вложения
Тип файла: rar SRAVNENIE TEXT.rar (15.3 Кб, 18 просмотров)

Последний раз редактировалось olimpus; 21.07.2008 в 19:03.
olimpus вне форума
Старый 22.07.2008, 06:35   #6
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Посмотрите вложение. Запустите макрос "Main".
Сделал так, как понял. Может подойдет?
На листе "Текст" оставил только основной столбец ("A"). Макрос просматривает этот столбец, ищет значение текущей ячейки в столбце "A" на листе "ошибки" и если находит - в столбец "B" помещает правильное значение (из столбца "C" листа "ошибки"). Если не находит - в столбец "B" помещает искомое значение.
Для наглядности, найденные и ненайденные значения окрашиваются в разный цвет.
Вложения
Тип файла: rar SRAVNENIE TEXT_2.rar (13.8 Кб, 44 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 22.07.2008, 15:59   #7
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию

вы почти правильно поняли ситуацию
Это последний этап преобразавания данных столбца "А"
дальше данные пойдут в сводную таблицу

можно сделать так (Пока не смотреть на предыдущие сообщения форума)
каждую новость в столбце "А" заменить на шаблонную столбец" G "
не нарушая очередности строк столбца "A"
Вложения
Тип файла: rar Регион.rar (13.4 Кб, 22 просмотров)
olimpus вне форума
Старый 23.07.2008, 05:03   #8
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Нет критериев сравнения. По каким признакам искать шаблон в столбце "G" для текущей ячейки столбца "A"?
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 23.07.2008, 06:19   #9
olimpus
Форумчанин
 
Регистрация: 17.07.2008
Сообщений: 105
По умолчанию

Цитата:
Сообщение от SAS888 Посмотреть сообщение
Нет критериев сравнения. По каким признакам искать шаблон в столбце "G" для текущей ячейки столбца "A"?





Видел объсуждение на соседнем форуме по Excel
програмно ставят на столбец ввода Фильтр (фильтр \Условие\Содержит)
Если я правильно понял , то при вставке в столбец "A" очередных новостей они подменяются на "Шаблонные"
посмотрите пожалуйста ссылку(там 2 страницы)
http://forum.msexcel.ru/microsoft_ex...sg2488#msg2488

Последний раз редактировалось olimpus; 23.07.2008 в 08:14.
olimpus вне форума
Старый 23.07.2008, 11:15   #10
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Сходил по Вашей ссылке. Присоединяюсь к мнению, что в подобных случаях
Цитата:
без ручной доработки не обойтись
Если использовать процентное совпадение символов в сравниваемых строках, то во-первых, это займет много времени, во-вторых, полученный результат также далек от желаемого.
Посмотрите предлагаемый алгоритм сравнения. Предполагается, что ошибок в словах нет. Это предположение позволяет вести анализ на уровне слов.
Сначала убираются все "лишние" пробелы как в исходном, так и в шаблонном столбцах. Затем, проходя по строкам анализируемого столбца, ищется частичное совпадение с шаблоном сначала всей строки, затем строки без последнего слова и т.д. до двух слов (искать частичное совпадение одного слова во-первых, глупо, во-вторых, долго). При первом совпадении, в столбец "I" анализируемой строки выводится предлагаемая замена с наивысшим приоритетом. В столбец "H" той же строки выводится процент совпадения строк на уровне слов.
Не знаю, на сколько это облегчит Вам жизнь. Попробуйте. Может с Вашей стороны будут интересные предложения по улучшению предложенного алгоритма.
P.S. "Мешающие глазу" столбцы скрыты. По окончании процедуры столбец с шаблонами также скрыт.
Вложения
Тип файла: rar Регион_3.rar (17.6 Кб, 67 просмотров)
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 23.07.2008 в 11:16. Причина: Добавлено
SAS888 вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как сравнить 2 блока памяти7 KORN Общие вопросы Delphi 5 01.04.2008 10:50
Сравнить колонки Romuald Microsoft Office Excel 11 22.01.2008 09:28
помогите! как сравнить BMP файлы? lenivec Мультимедиа в Delphi 20 14.11.2007 21:47
сравнить 2 строчки oLMeR Общие вопросы Delphi 3 02.11.2007 11:51