VBA. Сцепить ячейки, если в соседнем столбце будут одинаковые данные

Пользователь

Сообщений: 64 Регистрация: 12.09.2016

03.11.2019 13:14:27

Добрый день,

подскажите пожалуйста макрос, который поможет сцепить ячейки при условии что в соседнем столбце будут одинаковые данные.
Более детально можно увидеть в прикрепленном файле.

Прикрепленные файлы

Сцепление.xlsx (10.69 КБ)

Юрий М Модератор Сообщений: 61036 Регистрация: 14.09.2012 Контакты см. в профиле	#2 03.11.2019 13:19:55 Привет! А могут ли повториться данные в столбце С в пределах одного значения в столбце А? Если да, то что делать* И зачем нужен столбец В?

evgeniy2507 Пользователь Сообщений: 64 Регистрация: 12.09.2016	#3 03.11.2019 13:24:52 Юрий, данные в столбце С повториться могут, необходимо что бы все равно сцеплялось (например абавг). Столбцом б я показал что сцепление необходимо на 1 уровне. Можно и без него )

Юрий М Модератор Сообщений: 61036 Регистрация: 14.09.2012 Контакты см. в профиле	#4 03.11.2019 13:26:44 Устроит ли результат в виде отдельной таблицы вида: АААА абвг ББББ гдкеж

evgeniy2507 Пользователь Сообщений: 64 Регистрация: 12.09.2016	#5 03.11.2019 13:27:58 Да, вполне

Hugo

Пользователь

Сообщений: 23795 Регистрация: 22.12.2012

03.11.2019 13:31:35

Код
=ЕСЛИ(B2=1;VLOOKUPCOUPLE($A$2:$C$16;1;A2;3;"");"")

а код UDF в копилке:
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=read&FID=2&TID=10&TITLE_SEO=10

Цитата
evgeniy2507 написал: Можно и без него )

- тогда не применяйте ЕСЛИ():

Код
=VLOOKUPCOUPLE($A$2:$C$16;1;A2;3;"")

Изменено: Hugo - 03.11.2019 13:35:16

evgeniy2507 Пользователь Сообщений: 64 Регистрация: 12.09.2016	#7 03.11.2019 13:40:43 Спасибо большое. буду пробовать реализовывать Изменено: evgeniy2507 - 03.11.2019 13:40:53

Юрий М Модератор Сообщений: 61036 Регистрация: 14.09.2012 Контакты см. в профиле	#8 03.11.2019 13:44:24 См. вариант. Прикрепленные файлы Сцепить 01.xlsm (19.75 КБ)

evgeniy2507 Пользователь Сообщений: 64 Регистрация: 12.09.2016	#9 03.11.2019 13:46:49 Юрий, спасибо огромное то что нужно