Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Сравнение и замена текста внутри ячейки на текст из базы, Нужен макрос, выполяющий сравнение двух файлов
 
#1
19.04.2013 17:07:00
Привет всем!
В прикрепленном файле есть в документа.
Первый файл - это документ, в котором должен работать макрос.
Второй файл - база с фрагментами текстов.
Задача следующая:
Необходимо найти в первом документе определенный текст, находящийся во втором файле в столбце А ("Старые ссылки") и заменить найденный текст текстом из столбца В ("Новые ссылки").

Нюансы:
Поиск фрагмента текста нужно проводить по всему листу, а не по конкретному столбцу.
Со временем во втором файле будут добавлятся новые изменение, тоесть количество строк будет рости.
Размер текста в первом файле будет сравнительно не большой, поэтому обрабатывать очень большие данные макросу не придется, но он будет работать часто, так как этих файлов будет достаточно много. Именно с этих соображений и хочется иметь такой макрос.
Заранее большое спасибо за помощь!
 
 
 
#2
19.04.2013 17:10:49
В принципе, базу с искомым текстом и его наследником можно создать прямо в макросе. таких фрагментов будет не более 20. много места не займут
 
 
 
#3
20.04.2013 12:34:25
это заказ на работу. если интересует, пишите в личку
Живи и дай жить..
 
 
 
#4
20.04.2013 20:00:11
http://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=8&TID=18165 в этой теме разбиралась загрузка данных.... для простоты можете сделать загрузку данных в скрытый лист, а потом организовать поиск
Если очень захотеть - можно в космос полететь ;)
 
 
 
#5
20.04.2013 23:38:56
Цитата
vladimirukr пишет:
В принципе, базу с искомым текстом и его наследником можно создать прямо в макросе. таких фрагментов будет не более 20. много места не займут

Подумал, вот что пришло в голову всё что нужно искать и чем заменять находится в теле макроса... получилось три цыкла, можно отимизировать и убрать ненужные строки но уже поздно.......
Если очень захотеть - можно в космос полететь ;)
 
 
 
#6
21.04.2013 00:43:53
в общем виде задача может оказаться не столь тривиальной.
автор темы либо
1) этого не понимает;
2) хочет растянуть "удовольствие", загружая форум "по полной";
3) прекрасно знает и понимает, что никаких коллизий быть не может (местные особенности задачи), но это секрет.

я, собственно, вот о чём:
может одновременно попасться пара замен вида
"п.1 ст.1" на "п.1 ст.2"
"п.1 ст.1 пп.1" на "п.1 ст.1 пп.2"
либо
"п.1 ст.1" на "п.1 ст.2"
"п.1 ст.2" на "п.1 ст.3"

короче - одна строка будет частью другой или замены будут "перекрёстными"
вторая пробема худо-бедно решается правильным порядком замен либо, для сложных случаев, использованием промежуточных уникальных строк-"кракозябров".
первая - гораздо сложнее.

но... если уж секрет, то секрет.
а если п.1 или п.2 - то "я так не играю" (с)
Изменено: ikki - 21.04.2013 00:45:08
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#7
21.04.2013 00:51:37
пс. я в тихом шоке - тема всего лишь здесь, у Сержа и у Шмуйловича.
почему форум Д.Щербакова, кибер и программерс оказались обделёнными?
опять бессонная ночь.  :(
Изменено: ikki - 21.04.2013 00:57:48
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#8
21.04.2013 07:22:03
Цитата
ikki пишет:  почему форум Д.Щербакова, кибер и программерс оказались обделёнными?
поправка - кибер не обделён.
http://www.cyberforum.ru/ms-excel/thread842698.html

форуму: вам не кажется, что такие кросспостеры, не так уж давно бывшие единичными явлениями, всё чаще становятся "нормой" интернет Excel-сообщества?
или это просто неизбывная жажда халявы живёт и побеждает?  :D  

кстати, на кибере "решение" есть.  :)
фрилансер Excel, VBA - контакты в профиле
"Совершенствоваться не обязательно. Выживание — дело добровольное." Э.Деминг
 
 
 
#9
21.04.2013 07:44:36
форуму : вам не кажется, что такие кросспостеры, не так уж давно бывшие единичными явлениями, всё чаще становятся "нормой" интернет Excel-сообщества?
или это просто неизбывная жажда халявы живёт и побеждает?  :D  

кстати, на кибере "решение" есть.  :) [/QUOTE]

Присоединяюсь, жажда халявы, зачем натруждаться, если помогают и ничего в замен не просят ... Зачистую я каждый день с таким сталкиваюсь.....
Если очень захотеть - можно в космос полететь ;)
 
 
 
Страницы: 1
Читают тему
Наверх