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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.01.2011, 14:53   #1
azzaro
Новичок
Джуниор
 
Регистрация: 21.01.2011
Сообщений: 2
По умолчанию Как объединить значения дублей в одну ячейку

Форумцы привет! Сложно сформулировать потребнось, но я все таки попробую.
Таблица содержит 4 столбца: Номер, Название, Учредитель , Адрес учредителя. В таблице есть полностью уникальные значения и дубли но номерам и названиям, но разным значениям. Необходимо найти дубли по "Номеру" и объдинеть значения по каждой строке дубля в одну ячейку.
Вот как-то кат. Большое спасибо откликнувшимся!!!
Вложения
Тип файла: zip Пример.zip (6.9 Кб, 19 просмотров)
azzaro вне форума Ответить с цитированием
Старый 21.01.2011, 15:16   #2
Volodshan
Форумчанин
 
Регистрация: 20.05.2008
Сообщений: 241
По умолчанию

Без изобретения "велосипеда" - см. ZXC_PT.
Вложения
Тип файла: zip ZXC_PT.zip (9.1 Кб, 26 просмотров)
Volodshan вне форума Ответить с цитированием
Старый 21.01.2011, 15:50   #3
azzaro
Новичок
Джуниор
 
Регистрация: 21.01.2011
Сообщений: 2
По умолчанию

Цитата:
Сообщение от Volodshan Посмотреть сообщение
Без изобретения "велосипеда" - см. ZXC_PT.
Спасибо за отклик, но без велосипеда чувствую не обойтись.
Количество строк порой достигает нескольких тысяч и педальным приводом не хотелось бы объединять.
Или может быть я не правильно понял механизм преобразования????
azzaro вне форума Ответить с цитированием
Старый 21.01.2011, 16:07   #4
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Может быть http://www.planetaexcel.ru/forum.php?thread_id=16564
Сперва отобрать уникальные названия в другой столбец любым способом, потом:
для фамилий =VLOOKUPCOUPLE(Лист1!$B$7:$C$39;1;B 2;2;", ")

Только я в примере тянул по названию, правильне тянуть по номеру конечно.
А отобрать уникальные можно например расширенным фильтром.
Вложения
Тип файла: zip ZXC_PT.ZIP (16.4 Кб, 18 просмотров)
webmoney: E265281470651 Z422237915069 R418926282008

Последний раз редактировалось Hugo121; 21.01.2011 в 16:16.
Hugo121 вне форума Ответить с цитированием
Старый 21.01.2011, 16:42   #5
Volodshan
Форумчанин
 
Регистрация: 20.05.2008
Сообщений: 241
По умолчанию

azzaro! Если вы хотите себе на будущее обеспечить постоянную головную боль - валите все в одну кучу... Если же это - учебно-тренировочное задание, то вперед - лучше извлекаются уроки из собственных ошибок... ;-)
Volodshan вне форума Ответить с цитированием
Старый 22.01.2011, 10:24   #6
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Посмотрите вложение. Там два варианта (два макроса).
1-й использует автофильтр. Поэтому данные в таблице могут быть в любом порядке.
2-й макрос должен быть быстрее, но для правильной работы макрос сортирует данные по возрастанию по 1-му столбцу.
Выбирайте.
Вложения
Тип файла: rar Пример_2.rar (11.4 Кб, 34 просмотров)
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 22.01.2011 в 11:15.
SAS888 вне форума Ответить с цитированием
Старый 22.01.2011, 11:46   #7
shanemac51
Участник клуба
 
Аватар для shanemac51
 
Регистрация: 12.08.2010
Сообщений: 1,077
По умолчанию

какой смысл в такой груде мусора

Код:
3605000415
ЗАО "Росбромвтормет"
ПоляковПономаревЗубовКоневДоглихГадовСкребков
397520   Фурманова ул 1 а397520   Фурманова ул 1а397520   Красная ул 184404133   Дружбы ул 94  8404127   Дружбы ул 95  40404104   40 лет Победы ул 7  29397504   Дорожная ул 27  34
Имя-Галина== почта shanemac51@yandex.ru скайп shanemac51 c 8-15мск будни
Сфера интересов--word-excel-access-распознавание
shanemac51 вне форума Ответить с цитированием
Старый 22.01.2011, 11:51   #8
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Цитата:
какой смысл в такой груде мусора
Во-первых, на этот вопрос может ответить только автор. Во-вторых, если Вы смотрели мои варианты, то там все удовлетворяет условию задачи и все упорядочено, т.е. такого "мусора" там нет.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 22.01.2011, 12:34   #9
VictorM
Старожил
 
Аватар для VictorM
 
Регистрация: 15.05.2008
Сообщений: 2,058
По умолчанию

Цитата:
Как объединить значения дублей в одну ячейку
Цитата:
какой смысл в такой груде мусора
Так ведь это к Вам вопрос.
А задание выполнено ТОЧНО, как у Вас написано.
И, кстати, очень элегантно.
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499
VictorM вне форума Ответить с цитированием
Старый 22.01.2011, 14:45   #10
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Про груду мусора - в моей формуле можно добавить разделители - можно ", " или наприер "|". Потом легко по ним разбить назад.
И в любом случае это может быть нужно. Нам в работе например было нужно, потому и написал такую функцию.
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как вставить картинку в одну ячейку Liderx Microsoft Office Excel 2 15.02.2016 18:53
Объединить две процедуры в одну AndreiFQ Помощь студентам 5 24.06.2010 09:26
Объединить книги в одну. FormAlDeGid Microsoft Office Excel 2 10.03.2010 16:07
Как заставить одну ячейку заменять другую Kairan Microsoft Office Excel 8 22.02.2010 06:10
Как обозначить ячейку на одну правее от активной ячейки? ru3000 Microsoft Office Excel 4 28.07.2009 08:03