Приветствую всех! Прошу помощи в написании макроса, т.к. сам не в состоянии. :<
Имеется рабочий процесс, при котором каждый день создаются таблицы примерно в 3000-4000 строк. В таблицу проскакивает много дубликатов. Файл примера приложен.
Не знаю как внятно объяснить, но у нас есть столбец DCN - мы ищем строчки с одинаковыми значениями в DCN. Для каждой такой строчки будет значение в столбце Ref. И затем по этим значениям мы находим дубликат.
В итоге у нас получается нечто вида
DCN - Ref A1A - 1 A1A - 2 A1B - 1 A1B - 2
Из которых мы должны оставить A1A - 1 A1B - 2 Остальное закрасить цветом.
В файле-примере показано, какой результат хотелось бы получить для например групп по 3 и более.
Приветствую всех! Прошу помощи в написании макроса, т.к. сам не в состоянии. :<
Имеется рабочий процесс, при котором каждый день создаются таблицы примерно в 3000-4000 строк. В таблицу проскакивает много дубликатов. Файл примера приложен.
Не знаю как внятно объяснить, но у нас есть столбец DCN - мы ищем строчки с одинаковыми значениями в DCN. Для каждой такой строчки будет значение в столбце Ref. И затем по этим значениям мы находим дубликат.
В итоге у нас получается нечто вида
DCN - Ref A1A - 1 A1A - 2 A1B - 1 A1B - 2
Из которых мы должны оставить A1A - 1 A1B - 2 Остальное закрасить цветом.
В файле-примере показано, какой результат хотелось бы получить для например групп по 3 и более.Takenore
Вообще, для решения таких задач нужно включать логику. Моя говорит - нужно оставить А1В - 1, ваша А1В - 2. Почему?
Потому что нам нужно оставить грубо говоря уникальные строчки.
Мы берем и оставляем А1А - 1. Значит все остальные строчки А1А мы вычеркиваем, а также вычеркиваем строчки значения 1 в столбце Ref. Затем идем дальше. А1В - 1 - мы вычеркнули предыдущим шагом. Значит следующий уникум - А1В - 2. И тд
Вообще, для решения таких задач нужно включать логику. Моя говорит - нужно оставить А1В - 1, ваша А1В - 2. Почему?
Потому что нам нужно оставить грубо говоря уникальные строчки.
Мы берем и оставляем А1А - 1. Значит все остальные строчки А1А мы вычеркиваем, а также вычеркиваем строчки значения 1 в столбце Ref. Затем идем дальше. А1В - 1 - мы вычеркнули предыдущим шагом. Значит следующий уникум - А1В - 2. И тдTakenore
Takenore, Цвет лучше сделать условным форматированием К сообщению приложен файл: 1125153.xls(34Kb)
Основная суть задачи - автоматизация процесса. Ваш способ не снимает проблемы нахождения дублей. Необходимо переложить поиск на макрос. Сейчас ежедневно приходится это делать вручную. А таблица огромна.
Буду рад, если кто-то хотя бы поможет придумать алгоритм. Думаю с помощью гугла на vba как-нибудь его набью.
Takenore, Цвет лучше сделать условным форматированием К сообщению приложен файл: 1125153.xls(34Kb)
Основная суть задачи - автоматизация процесса. Ваш способ не снимает проблемы нахождения дублей. Необходимо переложить поиск на макрос. Сейчас ежедневно приходится это делать вручную. А таблица огромна.
Буду рад, если кто-то хотя бы поможет придумать алгоритм. Думаю с помощью гугла на vba как-нибудь его набью.Takenore
Takenore, В файле макрос прописан. Удалите значения в столбике "Е" и нажмите кнопку справа Также можете вставить больше данных в столбики DCN и Ref и посмотреть скорость работы
Takenore, В файле макрос прописан. Удалите значения в столбике "Е" и нажмите кнопку справа Также можете вставить больше данных в столбики DCN и Ref и посмотреть скорость работы miver
Takenore, В файле макрос прописан. Удалите значения в столбике "Е" и нажмите кнопку справа Также можете вставить больше данных в столбики DCN и Ref и посмотреть скорость работы B)
Прошу простить - смотрел с планшета, там поддержки макросов нет - и кнопка не отобразилась. Прекрасно работает! Большое Вам спасибо за помощь. Можно будет, если что, задать вопрос в приват? [moder]Правила форума п. 5о
Takenore, В файле макрос прописан. Удалите значения в столбике "Е" и нажмите кнопку справа Также можете вставить больше данных в столбики DCN и Ref и посмотреть скорость работы B)
Прошу простить - смотрел с планшета, там поддержки макросов нет - и кнопка не отобразилась. Прекрасно работает! Большое Вам спасибо за помощь. Можно будет, если что, задать вопрос в приват? [moder]Правила форума п. 5оTakenore
Сообщение отредактировал _Boroda_ - Среда, 15.07.2015, 20:12