Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Макрос, меняющий цвет шрифта ячейки при совпадении символов - Мир MS Excel

Старая форма входа
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Макрос, меняющий цвет шрифта ячейки при совпадении символов
Макрос, меняющий цвет шрифта ячейки при совпадении символов
Викт0р Дата: Суббота, 12.01.2013, 19:37 | Сообщение № 1
Группа: Гости
Здравствуйте, уважаемые форумчане.

Такие таблицы я обрабатываю вручную, но сейчас в работе столкнулся с объемом, который невозможно обработать вручную, поэтому прошу вашей помощи.

Итак алгоритм моей работы:
Я работаю с книгами, информация в которых на листе находится в двух столбцах.
Столбец 1 - комбинация слов.
Некоторые последующие строки в столбце 1 повторяют предыдущие.

В приложенном файле( www.hayabusa-club.ru/macros.xls ) в ячейке B5 словосочетание(последующее слово) включает в себя слово, находящееся в ячейке B4(включаемое слово), а ячейка B8 включает в себя B5 и B4.
По аналогии B15 включает в себя B7 и т.д.
Заметьте, что ячейка B14 включает слова, находящиеся в ячейке B13, но слова находятся в другом порядке. Порядок слов не имеет значения.

Все включаемые слова я выделяю серым шрифтом. Я делаю эту операцию сверху-вниз по возрастанию номера строки. Таким образом все неотформатированные слова после моей работы являются уникальными.

В столбце Е форматом показан желаемый результат.

Столбец 2 - числовой показатель
Каждое слово имеет числовой показатель, который указан в ячейке справа. Мой алгоритм подразумевает применение формата только в случае, если числовой показатель последующего слова равен или более 30% числового показателя включаемого слова.

Пожалуйста помогите с составлением макроса, который может выполнять эту работу автоматически.

Заранее спасибо, С уважением, Виктор. smile
 
Ответить
СообщениеЗдравствуйте, уважаемые форумчане.

Такие таблицы я обрабатываю вручную, но сейчас в работе столкнулся с объемом, который невозможно обработать вручную, поэтому прошу вашей помощи.

Итак алгоритм моей работы:
Я работаю с книгами, информация в которых на листе находится в двух столбцах.
Столбец 1 - комбинация слов.
Некоторые последующие строки в столбце 1 повторяют предыдущие.

В приложенном файле( www.hayabusa-club.ru/macros.xls ) в ячейке B5 словосочетание(последующее слово) включает в себя слово, находящееся в ячейке B4(включаемое слово), а ячейка B8 включает в себя B5 и B4.
По аналогии B15 включает в себя B7 и т.д.
Заметьте, что ячейка B14 включает слова, находящиеся в ячейке B13, но слова находятся в другом порядке. Порядок слов не имеет значения.

Все включаемые слова я выделяю серым шрифтом. Я делаю эту операцию сверху-вниз по возрастанию номера строки. Таким образом все неотформатированные слова после моей работы являются уникальными.

В столбце Е форматом показан желаемый результат.

Столбец 2 - числовой показатель
Каждое слово имеет числовой показатель, который указан в ячейке справа. Мой алгоритм подразумевает применение формата только в случае, если числовой показатель последующего слова равен или более 30% числового показателя включаемого слова.

Пожалуйста помогите с составлением макроса, который может выполнять эту работу автоматически.

Заранее спасибо, С уважением, Виктор. smile

Автор - Викт0р
Дата добавления - 12.01.2013 в 19:37
RAN Дата: Суббота, 12.01.2013, 19:54 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Немного подождете? Ну пока кто нибудь табличку наберет....
Надеюсь, больше полугода не потребуется. wink


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеНемного подождете? Ну пока кто нибудь табличку наберет....
Надеюсь, больше полугода не потребуется. wink

Автор - RAN
Дата добавления - 12.01.2013 в 19:54
Alex_ST Дата: Суббота, 12.01.2013, 20:37 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
Андрей, ты не прав.
Викт0р файл всё-таки выложил на www.hayabusa-club.ru/macros.xls
Он просто не оформил ссылку тэгами, поэтому ты её и не заметил.
Но описание в старт-топике такое запутанное... Что-то пока башка не варит. никак не въеду, что надо.



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеАндрей, ты не прав.
Викт0р файл всё-таки выложил на www.hayabusa-club.ru/macros.xls
Он просто не оформил ссылку тэгами, поэтому ты её и не заметил.
Но описание в старт-топике такое запутанное... Что-то пока башка не варит. никак не въеду, что надо.

Автор - Alex_ST
Дата добавления - 12.01.2013 в 20:37
Alex_ST Дата: Суббота, 12.01.2013, 20:46 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
Скачал файл. Не понял принципа закраски...
Вставил в таблицу рамку с текстом из старт-поста. Думал, что смогу понять алгоритм, глядя одновременно на данные и описание...
Наивный cry
Мой интеллект пасует.
Может быть автор как-то перефразирует задание или найдётся какой-нибудь толкователь... Я-пас.



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеСкачал файл. Не понял принципа закраски...
Вставил в таблицу рамку с текстом из старт-поста. Думал, что смогу понять алгоритм, глядя одновременно на данные и описание...
Наивный cry
Мой интеллект пасует.
Может быть автор как-то перефразирует задание или найдётся какой-нибудь толкователь... Я-пас.

Автор - Alex_ST
Дата добавления - 12.01.2013 в 20:46
ikki Дата: Суббота, 12.01.2013, 22:03 | Сообщение № 5
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
404 Not Found, однако


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщение404 Not Found, однако

Автор - ikki
Дата добавления - 12.01.2013 в 22:03
Alex_ST Дата: Суббота, 12.01.2013, 22:08 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
Интересно... Сама ссылка www.hayabusa-club.ru/macros.xls из старт-поста открывается , а из правильно оформленного тэгами URL - нет



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеИнтересно... Сама ссылка www.hayabusa-club.ru/macros.xls из старт-поста открывается , а из правильно оформленного тэгами URL - нет

Автор - Alex_ST
Дата добавления - 12.01.2013 в 22:08
Alex_ST Дата: Суббота, 12.01.2013, 22:13 | Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
Э! Да это у Сержа в движке проблемка завелась: тэги оформляются в посте правильно: {url=www.hayabusa-club.ru/macros.xls}www.hayabusa-club.ru/macros.xls{/url}
А переход по ссылке www.hayabusa-club.ru/macros.xls
вместо www.hayabusa-club.ru/macros.xls посылается на http://www.excelworld.ru/forum/www.hayabusa-club.ru/macros.xls
Надо ему сообщить.



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеЭ! Да это у Сержа в движке проблемка завелась: тэги оформляются в посте правильно: {url=www.hayabusa-club.ru/macros.xls}www.hayabusa-club.ru/macros.xls{/url}
А переход по ссылке www.hayabusa-club.ru/macros.xls
вместо www.hayabusa-club.ru/macros.xls посылается на http://www.excelworld.ru/forum/www.hayabusa-club.ru/macros.xls
Надо ему сообщить.

Автор - Alex_ST
Дата добавления - 12.01.2013 в 22:13
Serge_007 Дата: Суббота, 12.01.2013, 22:15 | Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Гостям ссылки запрещены (это что бы спамили меньше)
По поводу проблемы - не понял...


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеГостям ссылки запрещены (это что бы спамили меньше)
По поводу проблемы - не понял...

Автор - Serge_007
Дата добавления - 12.01.2013 в 22:15
Alex_ST Дата: Суббота, 12.01.2013, 22:18 | Сообщение № 9
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
www.hayabusa-club.ru/macros.xls - правильная ссылка для скачивания
а если её же оформить тэгами, то получается фигня



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
Сообщениеwww.hayabusa-club.ru/macros.xls - правильная ссылка для скачивания
а если её же оформить тэгами, то получается фигня

Автор - Alex_ST
Дата добавления - 12.01.2013 в 22:18
ikki Дата: Суббота, 12.01.2013, 22:21 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
ага. скачал.
второй столбец всегда отсортирован по убыванию?

насколько я понял задачу - алгоритм до безобразия простой.
берем очередное значение в ячейке ("эталон") и запоминаем его "вес" (число)
разбиваем на части split'ом
идем по списку ниже (если отсортировано - до то "30%", иначе - до конца + проверка в каждой строке)
для каждой строки split значения, сравнение полученного массива с "эталоном".
если все элементы "эталона" есть в текущем массиве, красим "эталон" серым и переходим к следующему эталону.

5 строк на весь алгоритм.
сравните с "многабукаф" исх. поста - "почувствуйте разницу" (с)
biggrin


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki


Сообщение отредактировал ikki - Суббота, 12.01.2013, 22:31
 
Ответить
Сообщениеага. скачал.
второй столбец всегда отсортирован по убыванию?

насколько я понял задачу - алгоритм до безобразия простой.
берем очередное значение в ячейке ("эталон") и запоминаем его "вес" (число)
разбиваем на части split'ом
идем по списку ниже (если отсортировано - до то "30%", иначе - до конца + проверка в каждой строке)
для каждой строки split значения, сравнение полученного массива с "эталоном".
если все элементы "эталона" есть в текущем массиве, красим "эталон" серым и переходим к следующему эталону.

5 строк на весь алгоритм.
сравните с "многабукаф" исх. поста - "почувствуйте разницу" (с)
biggrin

Автор - ikki
Дата добавления - 12.01.2013 в 22:21
Serge_007 Дата: Суббота, 12.01.2013, 22:36 | Сообщение № 11
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
[offtop] Alex_ST, спасибо, буду разбираться[/offtop]


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение[offtop] Alex_ST, спасибо, буду разбираться[/offtop]

Автор - Serge_007
Дата добавления - 12.01.2013 в 22:36
light26 Дата: Суббота, 12.01.2013, 22:40 | Сообщение № 12
Группа: Друзья
Ранг: Старожил
Сообщений: 1350
Репутация: 91 ±
Замечаний: 0% ±

2007, 2010, 2013
Цитата (Alex_ST)
Скачал файл. Не понял принципа закраски...

А условное форматирование не поможет?


Я не волшебник. Я только учусь
 
Ответить
Сообщение
Цитата (Alex_ST)
Скачал файл. Не понял принципа закраски...

А условное форматирование не поможет?

Автор - light26
Дата добавления - 12.01.2013 в 22:40
ikki Дата: Суббота, 12.01.2013, 22:46 | Сообщение № 13
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
Цитата (light26)
А условное форматирование не поможет?

свой вариант забыли прикрепить?


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщение
Цитата (light26)
А условное форматирование не поможет?

свой вариант забыли прикрепить?

Автор - ikki
Дата добавления - 12.01.2013 в 22:46
RAN Дата: Суббота, 12.01.2013, 22:55 | Сообщение № 14
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Вот что значит - делать нечего! biggrin
Кто-то заглянул, что-то написал, куда-то послал...
А из этого такие дебаты!.. biggrin biggrin biggrin


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеВот что значит - делать нечего! biggrin
Кто-то заглянул, что-то написал, куда-то послал...
А из этого такие дебаты!.. biggrin biggrin biggrin

Автор - RAN
Дата добавления - 12.01.2013 в 22:55
ikki Дата: Суббота, 12.01.2013, 22:59 | Сообщение № 15
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
злыи вы sad


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
Сообщениезлыи вы sad

Автор - ikki
Дата добавления - 12.01.2013 в 22:59
RAN Дата: Суббота, 12.01.2013, 23:21 | Сообщение № 16
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Who??? surprised


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеWho??? surprised

Автор - RAN
Дата добавления - 12.01.2013 в 23:21
ikki Дата: Суббота, 12.01.2013, 23:26 | Сообщение № 17
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
есть тут некоторые...
говорят...
"Вот что значит - делать нечего!"

а и правда...
Цитата
...
Они нам дуло к виску
Они нам вдребезги сердца
А мы за ними во тьму
А мы за ними в небеса

Они нам реки измен
Они нам океаны лжи
А мы им веру взамен
А мы им посвящаем жизнь

Кому, зачем?
...


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki


Сообщение отредактировал ikki - Суббота, 12.01.2013, 23:29
 
Ответить
Сообщениеесть тут некоторые...
говорят...
"Вот что значит - делать нечего!"

а и правда...
Цитата
...
Они нам дуло к виску
Они нам вдребезги сердца
А мы за ними во тьму
А мы за ними в небеса

Они нам реки измен
Они нам океаны лжи
А мы им веру взамен
А мы им посвящаем жизнь

Кому, зачем?
...

Автор - ikki
Дата добавления - 12.01.2013 в 23:26
Alex_ST Дата: Суббота, 12.01.2013, 23:44 | Сообщение № 18
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3209
Репутация: 609 ±
Замечаний: 0% ±

2003
Судя по развернувшемуся оффтопному флуду, не одному мне логика топик-стартера оказалась не по мозгам?



С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеСудя по развернувшемуся оффтопному флуду, не одному мне логика топик-стартера оказалась не по мозгам?

Автор - Alex_ST
Дата добавления - 12.01.2013 в 23:44
ikki Дата: Суббота, 12.01.2013, 23:46 | Сообщение № 19
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
Alex? wacko
я выложил алгоритм.
код писать лениво.
да и хотелось бы дождаться ответа на вопрос.


помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki
 
Ответить
СообщениеAlex? wacko
я выложил алгоритм.
код писать лениво.
да и хотелось бы дождаться ответа на вопрос.

Автор - ikki
Дата добавления - 12.01.2013 в 23:46
Викт0р Дата: Воскресенье, 13.01.2013, 07:15 | Сообщение № 20
Группа: Гости
Ikki, здравствуйте.

Спасибо, что откликнулись.

Второй столбец всегда отсортирован по убыванию? - Да.

Берем очередное значение в ячейке ("эталон") и запоминаем его "вес" (число), разбиваем на части split'ом(если это разбивка на слова, то правильно, 1 слово = 1 часть)

Идем по списку ниже, (если отсортировано - до то "30%", иначе - до конца + проверка в каждой строке), для каждой строки split значения, сравнение полученного массива с "эталоном".
если все элементы "эталона" есть в текущем массиве, красим "эталон" серым и переходим к следующему эталону. - Я гуманитарий, но все вроде описано правильно.

5 строк на весь алгоритм.
сравните с "многабукаф" исх. поста - "почувствуйте разницу" (с)

Копирайт оставляю за вами. ))
 
Ответить
СообщениеIkki, здравствуйте.

Спасибо, что откликнулись.

Второй столбец всегда отсортирован по убыванию? - Да.

Берем очередное значение в ячейке ("эталон") и запоминаем его "вес" (число), разбиваем на части split'ом(если это разбивка на слова, то правильно, 1 слово = 1 часть)

Идем по списку ниже, (если отсортировано - до то "30%", иначе - до конца + проверка в каждой строке), для каждой строки split значения, сравнение полученного массива с "эталоном".
если все элементы "эталона" есть в текущем массиве, красим "эталон" серым и переходим к следующему эталону. - Я гуманитарий, но все вроде описано правильно.

5 строк на весь алгоритм.
сравните с "многабукаф" исх. поста - "почувствуйте разницу" (с)

Копирайт оставляю за вами. ))

Автор - Викт0р
Дата добавления - 13.01.2013 в 07:15
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Макрос, меняющий цвет шрифта ячейки при совпадении символов
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!