Как найти объединенные ячейки?

Question

[Айнур Валиев]

Как найти объеденные ячейки, разъединить и заполнить пустоты, потому что заполняется только 1, 2-я остается пустой.

Comments

[Айнур Валиев]

мой вопрос сильно урезали, убрали ссылку на файл, и 2/3 текста вопроса.

[h8nor]

Написать макрос, который выполнит задачу.

Answer 1

[Максим К]

Ctrl+F - Параметры - формат-задать объединенные ячейки (галочку поставить) - найти разъединить.

Comments

[Айнур Валиев]

разъединить не проблема, это дело 5 секунд. Важно заполнить пустоты после разъединения.

Answer 2

[AmanitaRubescens]

Что пробовали сделать? Интернетом пользоваться умеете?
Кроме тиктока, инстаграмма....

Comments

[Айнур Валиев]

мой вопрос подредактировали. тут ни ссылок, ни того что я делал.

[AmanitaRubescens]

Сейчас видео найду как записать. с тебя 503 рубля

[Айнур Валиев]

AmanitaRubescens, если сработает - перекину.

[AmanitaRubescens]

Короче скачай видео https://cloud.mail.ru/public/CyAZ/h31kJzzXJ или там же посмотри...у меня в браузере мутное видео...

После того как нажмешь Пустые Ячейки -> ОК нажимай клавишу =, потом клавишу стрелку Вверх, потом Ctrl + Enter

Должно все сработать...

[AmanitaRubescens]

Айнур Валиев, получилось?

[Айнур Валиев]

AmanitaRubescens, сейчас

[Айнур Валиев]

AmanitaRubescens, на видео все круто. Какая там версия микрософт офис экселя? В libre office такого нет, как и в онлайн версиях микрософта и гугла.

[AmanitaRubescens]

2013.
Просили Exel - получайте :)

[Айнур Валиев]

AmanitaRubescens, спасибо! поставил эксель 2007. Там такой поиск есть. Но толку, также разъединить ячейки можно и без поиска. А заполнение пустых ячеек - у тебя заполняет все пустые, а мне надо только 2-ю, которая получилась после разъединения.
Мне бы тогда просто получить список объединенных ячеек.

[AmanitaRubescens]

Ну этот поиск как бы "выделяет" все сдвоенные ячейки и дальнейшие манипуляции происходят с этими "выделенными" ячейками...т.е. разделяет обратно на 2 строки...и берет из верхней ячейки данные и вставляет в нижнюю...т.е. как и написано в вашем вопросе - заполняется только 1, а 2 пустая - значит и надо вторую заполнить? Так и получилось...

[Айнур Валиев]

AmanitaRubescens, понятно, значит не так сделал. Сделаю повторно и отпишу результат. Также твой ответ надо отметить решением. Ты можешь продублировать ответ?

[AmanitaRubescens]

Айнур Валиев, нельзя тут дублировать....пусть висит как открытый....

[Айнур Валиев]

AmanitaRubescens, чето правила резко ужесточились. раньше тут и посылали друг друга, и пиарились (сам тоже продвигал свой сайт), и ссылки всякие добавляли.

[Айнур Валиев]

AmanitaRubescens, наверное ты гений. Сделал как ты сказал - все сработало, пустые ячейки продублировались, заполнившись нужными значениями. Это просто магия! Куда тебе скинуть бонус?
И жаль что ссылка с видео больше не доступна, было бы полезным для других пользователей.

[AmanitaRubescens]

Айнур Валиев, если б я был бы гей...гений т.е....
Скинь бонус в детский дом!
Ну теперь ты сам сможешь снять такое видео =)

[Айнур Валиев]

AmanitaRubescens, будешь еще, все впереди) странно что такие фичи выпилили в новых версиях эксель. Видео снимать не буду, но текстовую инструкцию оставлю.

Answer 3

[Никита Дворец]

Вариант VBA Excel для задачи "найти и разъединить":

Sub FindMergedCells()
Dim TheRange As Range
For Each TheRange In ActiveSheet.UsedRange
If TheRange.MergeCells Then
ActiveSheet.Cells.UnMerge
Else
End If
Next TheRange
End Sub

Comments

[Айнур Валиев]

что то подобное мне выдал чат gpt, но это не сработало.