Объединение ячеек в excel без потери данных макрос

Надпись на заборе: «Катя + Миша + Семён + Юра + Дмитрий Васильевич +
товарищ Никитин + рыжий сантехник + Витенька + телемастер Жора +
сволочь Редулов + не вспомнить имени, длинноволосый такой +
ещё 19 мужиков + муж = любовь!»

Способ 1. Функции СЦЕПИТЬ, СЦЕП и ОБЪЕДИНИТЬ

В категории Текстовые есть функция СЦЕПИТЬ (CONCATENATE), которая соединяет содержимое нескольких ячеек (до 255) в одно целое, позволяя комбинировать их с произвольным текстом. Например, вот так:

Нюанс: не забудьте о пробелах между словами — их надо прописывать как отдельные аргументы и заключать в скобки, ибо текст. 

Очевидно, что если нужно собрать много фрагментов, то использовать эту функцию уже не очень удобно, т.к. придется прописывать ссылки на каждую ячейку-фрагмент по отдельности. Поэтому, начиная с 2016 версии Excel, на замену функции СЦЕПИТЬ пришла ее более совершенная версия с похожим названием и тем же синтаксисом — функция СЦЕП (CONCAT). Ее принципиальное отличие в том, что теперь в качестве аргументов можно задавать не одиночные ячейки, а целые диапазоны — текст из всех ячеек всех диапазонов будет объединен в одно целое:

Для массового объединения также удобно использовать новую функцию ОБЪЕДИНИТЬ (TEXTJOIN), появившуюся начиная с Excel 2016. У нее следующий синтаксис:

=ОБЪЕДИНИТЬ(Разделитель; Пропускать_ли_пустые_ячейки; Диапазон1; Диапазон2 … )

где

• Разделитель — символ, который будет вставлен между фрагментами
• Второй аргумент отвечает за то, нужно ли игнорировать пустые ячейки (ИСТИНА или ЛОЖЬ)
• Диапазон 1, 2, 3 … — диапазоны ячеек, содержимое которых хотим склеить

Например:

Способ 2. Символ для склеивания текста (&)

Это универсальный и компактный способ сцепки, работающий абсолютно во всех версиях Excel. 

Для суммирования содержимого нескольких ячеек используют знак плюс «+«, а для склеивания содержимого ячеек используют знак «&» (расположен на большинстве клавиатур на цифре «7»). При его использовании необходимо помнить, что:

• Этот символ надо ставить в каждой точке соединения, т.е. на всех «стыках» текстовых строк также, как вы ставите несколько плюсов при сложении нескольких чисел (2+8+6+4+8)
• Если нужно приклеить произвольный текст (даже если это всего лишь точка или пробел, не говоря уж о целом слове), то этот текст надо заключать в кавычки. В предыдущем примере с функцией СЦЕПИТЬ о кавычках заботится сам Excel — в этом же случае их надо ставить вручную.

Вот, например, как можно собрать ФИО в одну ячейку из трех с добавлением пробелов:

Если сочетать это с функцией извлечения из текста первых букв — ЛЕВСИМВ (LEFT), то можно получить фамилию с инициалами одной формулой:

Способ 3. Макрос для объединения ячеек без потери текста.

Имеем текст в нескольких ячейках и желание — объединить эти ячейки в одну, слив туда же их текст. Проблема в одном — кнопка Объединить и поместить в центре (Merge and Center) в Excel объединять-то ячейки умеет, а вот с текстом сложность — в живых остается только текст из верхней левой ячейки. 

Чтобы объединение ячеек происходило с объединением текста (как в таблицах Word) придется использовать макрос. Для этого откройте редактор Visual Basic  на вкладке Разработчик — Visual Basic (Developer — Visual Basic) или сочетанием клавиш Alt+F11, вставим в нашу книгу новый программный модуль (меню Insert — Module) и скопируем туда текст такого простого макроса:

Sub MergeToOneCell()
    Const sDELIM As String = " "     'символ-разделитель
    Dim rCell As Range
    Dim sMergeStr As String
    If TypeName(Selection) <> "Range" Then Exit Sub   'если выделены не ячейки - выходим
    With Selection
        For Each rCell In .Cells
            sMergeStr = sMergeStr & sDELIM & rCell.Text  'собираем текст из ячеек
        Next rCell
        Application.DisplayAlerts = False   'отключаем стандартное предупреждение о потере текста
        .Merge Across:=False                'объединяем ячейки
        Application.DisplayAlerts = True
        .Item(1).Value = Mid(sMergeStr, 1 + Len(sDELIM))    'добавляем к объед.ячейке суммарный текст
    End With
End Sub

Теперь, если выделить несколько ячеек и запустить этот макрос с помощью сочетания клавиш Alt+F8 или кнопкой Макросы на вкладке Разработчик (Developer — Macros), то Excel объединит выделенные ячейки в одну, слив туда же и текст через пробелы.

Ссылки по теме

• Делим текст на куски
• Объединение нескольких ячеек в одну с сохранением текста с помощью надстройки PLEX
• Что такое макросы, как их использовать, куда вставлять код макроса на VBA

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

Автоматическое объединение большого количества ячеек по вертикали

Допустим мы имеем маркетинговый план внедрения нового информационного программного продукта:

Чтобы план было легче визуально анализировать лучше объединить ячейки этапов выполнения плана: A2:A4, B2:B4 и т.д. К сожалению, многократно объединять диапазоны с большим количеством строк вручную – это задание требует слишком много времени и сил. Кроме того, можно допустить много ошибок после очередного десятка выделения ячеек перед объединением. Рассмотрим каким способом можно существенно облегчить свой труд переложив большую часть работы на простую программу, написанную на языке VBA прямо в Excel. Для этого следует написать макрос, который безошибочно быстро и автоматически объединит ячейки диапазонов с разным количеством строк для каждого столбца.

1. Сначала откройте редактор макросов: «РАЗРАБОТЧИК»-«Код»-«Visual Basic» (или просто нажмите ALT+F11).



2. Откройте стандартный модуль выбрав инструмент в редакторе: «Insert»-«Module» и введите в него следующий код макроса для объединения ячеек:

Sub ObedenitVertikal()
Dim i As Long
Dim j As Long
Dim intext As String
Application.DisplayAlerts = False
For i = 1 To Selection.Columns.Count
  intext = Selection.Cells(1, i)
  For j = 2 To Selection.Rows.Count
    intext = intext & Chr(10) & Selection.Cells(j, i)
  Next
  Selection.Columns(i).Merge
  Selection.Cells(1, i) = intext
Next
Application.DisplayAlerts = True
End Sub


Пока что это еще не полная версия макроса поэтому перед тем как его проверить нам все еще вручную необходимо выделить первый диапазон A2:D4. После чего можно выполнить нашу первую версию макроса.



Запуск макроса для объединения ячеек

Выбираем инструмент: «РАЗРАБОТЧИК»-«Код»-«Макросы».

В появившемся диалоговом окне выделяем значение «ObedenitVertikal» и нажимаем на кнопку «Выполнить».

Потом снова вручную выделите новый диапазон A5:D9 и повторно выполните тот же макрос. Ячейки будут выделены как показано ниже на рисунке:

В начале кода определены 3 переменные: две из них выполняют функцию счетчика, а третья служит для временного хранения текстового содержания ячеек. Счетчик первой переменной в цикле проходит по очереди все столбцы выделенного диапазона ячеек. В каждом таком столбце в текстовую переменную записывается текст, который содержится в первой ячейке каждого выделенного столбца. Второй счетчик идет по строкам каждого столбца и дописывает в текстовую переменную текстовые значения из остальных ячеек каждого текущего столбца выделенного диапазона – сверху вниз. Тексты, взятые из отдельных ячеек разделяться символом обрыва строки.

Символ обрыва строки вставлен с помощью функции Chr(10). Каждый вводимый символ из клавиатуры имеет свой код ASCII. Если введем код 10 в качестве аргумента для функции Chr(), тогда она будет возвращать символ обрыва строки. Такой же код ASCII на клавиатуре вызывается клавишей Enter для обрыва строки во всех текстовых редакторах.

Потом остальной код макроса объединяет все ячейки столбцов в выделенном диапазоне, а потом заполняет их текстом из текстовой переменной. Чтобы не появлялось предупреждающее сообщение об объединении ячеек, в начале кода программы макроса отключаем отображение сообщений в Excel средствами программирования. Для этой цели используем свойство: Application.DisplayAlerts = Fale. После выполнения кода макроса изменяем значение свойства на True, чтобы в дальнейшем процессе работы с программой Excel все сообщения предупреждений (Alerts) имели возможность отображаться.

Внимание! Если ячейки выделенного диапазона будут содержать формулы, то после выполнения макроса эти формулы будут заменены на текст. В результате после объединения ячеек макросом, формулы могут быть утеряны.

Модернизация и настройка кода макроса для объединения ячеек

Если нам нужно изменить текст разделяющий отдельные строки символов содержащийся в целых ячейках, то можно вписать другой код символа, текст или несколько текстов соединенных символом амперсантом (&). Допустим мы хотим вставить между двумя символами разрыва строки текст, состоящий из пяти тире «——». Тогда данную строку следует модифицировать следующим образом:

intext = intext & Chr(10) & “——” & Chr(10) & Selection.Cells(j, i)

Если в объединенной ячейке мы хотим всегда вставлять только текст из первой ячейки в выделенном столбце (без текстов, записанных в остальных ячейках), тогда удалим или закомментируем переменную второго счетчика и часть кода второго цикла:

Если нам нужно чтобы выполнять макрос после выделения нескольких диапазонов (с удержанием клавиши CTRL), тогда можно добавить еще одну переменную, которая будет дополнять функцию счетчика:

Dim k As Long

Перед первым циклом добавим новую строку с кодом:

For k = 1 To Selection.Areas.Count

А после последнего цикла добавим строку конца нового цикла:

Next

Соответственно добавим новый отступ, чтобы код был более читабельным. Кроме того, после всех изменений для объекта Selection добавим ссылку на диапазон:

Selection.Areas(k)

Полная новая версия макроса для объедения ячеек выделенных нескольких диапазонов, выглядит так:

Sub ObedenitVertikal()
Dim i As Long
Dim j As Long
Dim k As Long
Dim intext As String
Application.DisplayAlerts = False
For k = 1 To Selection.Areas.Count
  For i = 1 To Selection.Areas(k).Columns.Count
    intext = Selection.Areas(k).Cells(1, i)
    For j = 2 To Selection.Areas(k).Rows.Count
     intext = intext & Chr(10) & Selection.Areas(k).Cells(j, i)
    Next
    Selection.Areas(k).Columns(i).Merge
    Selection.Areas(k).Cells(1, i) = intext
  Next
Next
Application.DisplayAlerts = True
End Sub


Тепер выделяем 2 диапазона подряд A2:D4, A5:D8, A с нажатой клавишей CTRL на клавиатуре:

В результате получаем идентичный вид таблицы с объединенными ячейками:

Читайте также:

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

Как объединить столбцы в Excel используя макрос.

Если выполнить первую версию макроса (без всех этих изменений), для многократного выделения диапазонов с нажатой клавишей CTRL, то объединение строк по столбцам будет выполнено только для первого диапазона.

Как в Excel объединить ячейки с текстом в одну без потери данных

Многофункциональный редактор таблиц Microsoft Excel позволяет решать одну и ту же задачу несколькими способами. Пользователь может выполнять действия вручную, с помощью горячих клавиш, формул, специальных надстроек. Это же касается и объединения ячеек с разными условиями. Сегодня мы поговорим о том, как в Экселе объединить ячейки с текстом в одну без потери данных. Эта операция выполняется как штатными средствами программы, так и с помощью сторонних плагинов. Если соединять заполненные клетки обычным образом, то сохранится содержимое только левой ячейки, поэтому без хитростей в данном случае не обойтись.

Буфер обмена

С помощью обычной процедуры копирования и вставки можно решить данную проблему. Однако успешно перенести содержимое ячеек можно с помощью встроенной функции «Буфер обмена». Рассмотрим процедуру детально:

1. Сначала вам нужно открыть боковое окно с содержимым буфера обмена. Для этого во вкладке «Главная» нажмите на кнопку отображения этого блока в основном окне Excel.
2. Теперь выделите мышкой ячейки, содержимое которых нужно объединить в одну. Скопируйте их с помощью панели инструментов, контекстного меню или сочетания клавиш Ctrl + C .
3. Теперь дважды щелкните мышкой по ячейке, где должен поместиться объединенный текст.
4. Кликните по вставляемому объекту из окна «Буфер обмена». После чего текст из двух ячеек появится в одной клетке.

Этот способ самый простой в реализации, но он лишен дополнительных возможностей. Вы не сможете выбирать разделительные знаки, применять один алгоритм к нескольким строкам или столбцам. Все действия придется выполнять вручную.

Объединение с помощью формулы

Теперь перейдем к более сложным методам. Одним из них является использование формулы. Рассмотрим процедуру подробнее:

1. Дважды кликните мышкой по ячейке, в которую необходимо поместить объединенный текст.
2. Начните вписывать формулу. Для этого поставьте знак = и кликните сначала по первой ячейке. Затем через знак & добавляйте остальные клетки. Примените формулу клавишей Enter .
3. Теперь вы видите содержимое ячеек, но без разделительных знаков. Чтобы между словами или блоками появились пробелы, необходимо усложнить формулу. Она примет вид =D3&” “&E3 .

Теперь вы объединили текст из двух клеток. Но что делать, если вам необходимо повторить ту же процедуру для нескольких строк подряд? Все достаточно просто. Вам необходимо поставить курсор мышки в угол новой ячейки и протянуть его до конца всей таблицы.

Как объединить ячейки в Excel без потери данных?

Описание проблемы

К сожалению, при объединении двух или более ячеек, содержащих текст, Excel сохраняет значение только первой ячейки. Данные в остальных ячейках будут удалены. Решить эту задачу стандартным способом можно предварительно объединив текст ячеек с помощью функции СЦЕПИТЬ. Однако это несколько неудобно и отнимает большое количество времени. Чтобы быстро и удобно объединять ячейки и НЕ терять данные в них, лучше пользоваться дополнением к Excel — надстройкой VBA-Excel. Это наглядно продемонстрировано на рисунке справа.

Программа позволяет объединить ячейки с сохранением данных как отдельно выбранного диапазона, так и объединять ячейки построчно или по столбцам.

Ниже подробно описан порядок действий для этих случаев.

Если необходимо объединить одну область ячеек

1. Выделите диапазон ячеек, которые хотите объединить с сохранением текста.
2. Перейдите на вкладку VBA-Excel
3. Нажмите на команду Объединить ячейки
   
4. Выберите разделитель в появившемся диалоговом окне. Для удобства имеется предварительный просмотр результата.
   
5. Нажмите кнопку Объединить

​Если необходимо объединить сразу несколько диапазонов ячеек

Надстройка VBA-Excel сможет облегчить процесс даже в том случае, если необходимо объединить большое количество ячеек с сохранением данных (например, по строкам или столбцам).

Для этого необходимо выполнить первые 4 действия из инструкции выше и дополнительно задать тип объединения ячеек.

3 способа склеить текст из нескольких ячеек

Надпись на заборе: «Катя + Миша + Семён + Юра + Дмитрий Васильевич +
товарищ Никитин + рыжий сантехник + Витенька + телемастер Жора +
сволочь Редулов + не вспомнить имени, длинноволосый такой +
ещё 19 мужиков + муж = любовь!»

Способ 1. Функции СЦЕПИТЬ, СЦЕП и ОБЪЕДИНИТЬ

В категории Текстовые есть функция СЦЕПИТЬ (CONCATENATE) , которая соединяет содержимое нескольких ячеек (до 255) в одно целое, позволяя комбинировать их с произвольным текстом. Например, вот так:

Нюанс: не забудьте о пробелах между словами — их надо прописывать как отдельные аргументы и заключать в скобки, ибо текст.

Очевидно, что если нужно собрать много фрагментов, то использовать эту функцию уже не очень удобно, т.к. придется прописывать ссылки на каждую ячейку-фрагмент по отдельности. Поэтому, начиная с 2016 версии Excel, на замену функции СЦЕПИТЬ пришла ее более совершенная версия с похожим названием и тем же синтаксисом — функция СЦЕП (CONCAT) . Ее принципиальное отличие в том, что теперь в качестве аргументов можно задавать не одиночные ячейки, а целые диапазоны — текст из всех ячеек всех диапазонов будет объединен в одно целое:

Для массового объединения также удобно использовать новую функцию ОБЪЕДИНИТЬ (TEXTJOIN) , появившуюся начиная с Excel 2016. У нее следующий синтаксис:

=ОБЪЕДИНИТЬ( Разделитель ; Пропускать_ли_пустые_ячейки ; Диапазон1 ; Диапазон2 . )

• Разделитель — символ, который будет вставлен между фрагментами
• Второй аргумент отвечает за то, нужно ли игнорировать пустые ячейки (ИСТИНА или ЛОЖЬ)
• Диапазон 1, 2, 3 . — диапазоны ячеек, содержимое которых хотим склеить

Например:

Способ 2. Символ для склеивания текста (&)

Это универсальный и компактный способ сцепки, работающий абсолютно во всех версиях Excel.

Для суммирования содержимого нескольких ячеек используют знак плюс «+«, а для склеивания содержимого ячеек используют знак «&» (расположен на большинстве клавиатур на цифре «7»). При его использовании необходимо помнить, что:

• Этот символ надо ставить в каждой точке соединения, т.е. на всех «стыках» текстовых строк также, как вы ставите несколько плюсов при сложении нескольких чисел (2+8+6+4+8)
• Если нужно приклеить произвольный текст (даже если это всего лишь точка или пробел, не говоря уж о целом слове), то этот текст надо заключать в кавычки. В предыдущем примере с функцией СЦЕПИТЬ о кавычках заботится сам Excel — в этом же случае их надо ставить вручную.

Вот, например, как можно собрать ФИО в одну ячейку из трех с добавлением пробелов:

Если сочетать это с функцией извлечения из текста первых букв — ЛЕВСИМВ (LEFT) , то можно получить фамилию с инициалами одной формулой:

Способ 3. Макрос для объединения ячеек без потери текста.

Имеем текст в нескольких ячейках и желание — объединить эти ячейки в одну, слив туда же их текст. Проблема в одном — кнопка Объединить и поместить в центре (Merge and Center) в Excel объединять-то ячейки умеет, а вот с текстом сложность — в живых остается только текст из верхней левой ячейки.

Чтобы объединение ячеек происходило с объединением текста (как в таблицах Word) придется использовать макрос. Для этого откройте редактор Visual Basic на вкладке Разработчик — Visual Basic (Developer — Visual Basic) или сочетанием клавиш Alt + F11 , вставим в нашу книгу новый программный модуль (меню Insert — Module) и скопируем туда текст такого простого макроса:

Теперь, если выделить несколько ячеек и запустить этот макрос с помощью сочетания клавиш Alt + F8 или кнопкой Макросы на вкладке Разработчик (Developer — Macros) , то Excel объединит выделенные ячейки в одну, слив туда же и текст через пробелы.

Как в Excel объединить текст из двух и нескольких ячеек в одну

Объединение текста нескольких ячеек в одну – базовая функция при работе с табличными данными, с ее п.

Объединение текста нескольких ячеек в одну – базовая функция при работе с табличными данными, с ее помощью содержание произвольного количества полей можно сцеплять нужным образом и размещать в свободных ячейках. Она используется при составлении пофамильных списков сотрудников, отчетов различных направлений и других операциях с большими массивами информации. Для объединения ячеек есть два способа: с потерей данных и без потери. В первом случае в объединенной ячейке остается только одно значение, во втором – сохраняется весь текст. Второй способ предполагает как минимум четыре варианта объединения: с использованием двух функций («Сцеп-сцепить» и «Объединить»), при помощи символа амперсанд и с применением макроса. В статье подробно разберемся, как в Excel объединить текст нескольких ячеек в одну.

С помощью функции

Excel предусматривает несколько функций для объединения ячеек. Для начала, расскажем о самой простой и «теряющей» информацию. Если интересует, как в Экселе соединить текст из двух ячеек в одну, оставив только одно значение – то вам понадобится функция «объединить» в разделе «Формат ячейки».

1. Выделите мышкой ячейки, которые нужно объединить.
2. По образовавшемуся полю щелкните правой кнопкой мыши.
3. Выберите пункт «Формат ячеек».
4. В появившемся окне зайдите в раздел «Выравнивание».
5. Отметьте галочкой пункт «Объединить ячейки» и нажмите «Ок». Выделенные поля объединяться в одну большую с сохранением содержания первой ячейки.

Также эта функция есть в графе «Главная» в разделе «Выравнивание» в верхней части экрана.

С помощью функции «Сцеп-сцепить»

В ранних версиях Excel для объединения текста ячеек применялась функция «Сцепить», в новых вариантах программы ее заменили функцией «Сцеп». Для ее использования:

1. Щелкните по пустой ячейке в Excel.
2. Поставьте знак «=» и большими буквами введите «Сцепить» либо «Сцеп».
3. В скобках после формулы кликните по ячейке, которая должна быть первой в объединенной ячейке, либо введите ее адрес вручную (например, A1). Затем поставьте точку с запятой, после щелкните или напишите вторую ячейку. Затем поставьте точку с запятой и отметьте третье поле. После перечисления адресов нажмите «Enter». В поле, где вбивали формулу, появится объединенный текст. Он появится без пробелов между текстовыми блоками. Чтобы этого избежать, отбейте пробел в каждой отдельно взятой ячейке после находящегося текста, либо после адреса ячейки в формуле добавьте пробел вручную, написав « » (пробел в кавычках). Пробел в формуле также отделяется от остальных элементов точкой с запятой.

Как в Экселе соединить текст из двух ячеек в одну с помощью функции «Объединить»

«Объединить» — усовершенствованная вариация функции «Сцеп». Ее отличие в том, что параметры вводятся единожды на этапе написания функции. В частности, разделитель придется указать один раз для содержимого всех ячеек. Для того чтобы воспользоваться функцией «Объединить» нужно выполнить действия:

1. В пустой ячейке поставьте знак «=» и напишите большими буквами «Объединить».
2. В скобках после формулы укажите разделитель в кавычках (« » ,«,»,« и »), затем поставьте точку с запятой. Второй параметр формулы – это игнорирование пустых полей. Если они не должны учитываться в формуле, напишите «1», в ряде версий этот параметр обозначается словом «Истина» или «Ложь». Затем перечислите через запятую ячейки, которые нужно объединить, и нажмите «Enter».

В итоге формула должна иметь вид: «=ОБЪЕДИНИТЬ(« »;ИСТИНА; «A1»; «A2»; «A3»).

Если в A1 – «Иванов», в А2 – «Иван», в А3 – «Иванович», то после нажатия «Enter» в пустой ячейке появится «Иванов Иван Иванович».

С помощью символа «&»

Четвертый способ объединить ячейки – использовать амперсанд ( «&»). Для этого:

1. В пустой ячейке наберите «=».
2. Напишите нужную ячейку, например, А1, затем поставьте знак «&», потом в кавычках введите разделитель. Это может быть пробел или запятая, он также помещается в кавычки, потом введите вторую ячейку, которую нужно объединить. Если их больше двух, пробел выставите после каждой нового поля. Формула должна выглядеть так: «=А1&« »&А2& « »&А3». После нажатия «Enter» содержимое ячеек объединится.

С помощью макроса

Макрос в Excel – это сервис для автоматизации повторяющихся действий, он представляет собой записанную последовательность примененных функций и щелчков мышью для последующего воспроизводства. Используется, если нужно регулярно выполнять типовые задачи, в которых меняются данные, но не структура. Например, макросы используются при составлении ежемесячных отчетов о заработной плате, в которых меняются только цифры, но не метод расчета. Тогда макрос избавит пользователя от необходимости регулярно вручную настраивать и использовать формулы.

Чтобы записать макрос:

1. В разделе «Разработчик» в графе «Код» нажмите на клавишу «Записать макрос».
2. В появившемся окне выберите имя макроса, чтобы потом было удобнее его искать, присвойте ему сочетание клавиш и место хранения, добавьте описание.
3. Нажмите «Ок», затем точно и без ошибок (потому что макрос записывает и ошибки тоже) проделайте алгоритм.
4. Вернитесь во вкладку «Разработчик» и «Код» и нажмите «Остановить запись».

Макрос записывается в виде кода Visual Basic для приложений на одноименном языке программирования, который доступен для редактирования при нажатии комбинации ALT + F11. При ручном редактировании становится доступным правка записанного макроса, однако это требует дополнительных знаний и недоступно для рядового пользователя. Также макросы способны работать в нескольких продуктах Microsoft Office одновременно. Выполняется макрос нажатием присвоенной комбинации либо через окно «Макрос», которое вызывается комбинацией ALT + F8.

Как объединить ячейки в таблице Excel

При работе с таблицами в программе Эксель у пользователей нередко возникает потребность в объединении некоторых ячеек. Сама по себе эта задача не представляет никакой сложности, если в этих ячейках нет данных, т.е. они пустые. Но как быть в ситуации, когда в ячейках содержится какая-либо информация? Не потеряются ли данные после объединения? В этой статье мы подробно разберём этот вопрос.

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

Процедура довольно легкая и может использоваться в следующих случаях:

1. Объединение пустых ячеек.
2. Объединение ячеек, среди которых только одна содержит заполненные данные.

Прежде всего, необходимо выделить левой кнопкой мыши объединяемые ячейки. Затем переходим в меню программы на вкладку «Главная» и ищем там нужный нам параметр — «Объединить и поместить в центре».

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

В случае, если требуется, чтобы информация располагалась не по центру, а с учетом форматирования ячейки, следует нажать небольшую стрелку вниз, расположенную рядом с пиктограммой объединения ячеек и в открывшемся меню выбираем пункт «Объединить ячейки».

При таком способе объединения данные будут выровнены по правому краю объединенной ячейки (по умолчанию).

В программе предусмотрена возможность и построчного объединения ячеек. Чтобы его выполнить выделяем необходимый диапазон ячеек, включающий несколько строк и щелкаем по пункту «Объединить по строкам».

При таком способе объединения результат несколько иной: ячейки объединились в одну, но с разбивка по строкам сохранилась.

Как объединить ячейки через контекстное меню

Ячейки также можно объединить посредством использования контекстного меню. Для выполнения этой задачи необходимо выделить курсором объединяемую область, щелкнуть правой кнопкой мыши, после чего выбрать из списка «Формат ячеек».

А появившемся окне выбираем пункт «Выравнивание» и ставим галочку напротив «Объединение ячеек». В этом меню также можно выбрать и другие параметры объединения: перенос текста по словам, автоподбор ширины, горизонтальная и вертикальная ориентация, направление, различные варианты выравнивания и прочее. После того как все параметры выставлены кликаем на «OK».

Итак, как мы и хотели, ячейки объединились в одну.

Как объединить ячейки без потери данных

Но как быть в ситуации, когда несколько ячеек содержат данные? Ведь при простом объединении вся информация, кроме левой верхней ячейки, будет удалена.

И у этой, казалось бы, непростой задачи есть решение. Для этого можно воспользоваться функцией «СЦЕПИТЬ».

Первым шагом делаем следующее. Между объединяемыми ячейками необходимо добавить пустую ячейку. Чтобы это сделать нужно правой кнопкой мыши щелкнуть на номер столбца/строки, перед которыми мы хотим добавить новый столбец/строку и выбрать в раскрывшемся меню пункт “Вставка”.

В полученной новой ячейке прописываем формулу по следующему шаблону: “=СЦЕПИТЬ(X;Y)“. При этом X и Y — это значения координат объединяемых ячеек.

В нашем случае, требуется сцепить ячейки B2 и D2, значит, прописываем формулу “=СЦЕПИТЬ(B2;D2)” в ячейку C2.

Итогом будет склеивание данных в объединенной ячейке. Однако, как вы можете заметить, у нас получились целых три ячейки, вместо одной объединенной: две исходные и, соответственно, сама объединенная.

Для того чтобы убрать лишние ячейки, щелкаем мышью (правой кнопкой) по получившейся объединенной ячейке. В выпадающем списке необходимо нажать «Копировать».

Далее идем в ячейку, находящуюся справа от объединенной (в которой находятся изначальные данные), щелкаем правой кнопкой мыши по ней, после чего выбираем из списка параметр “Специальная вставка».

В открывшемся окне среди всех вариантов выбираем “Значения” и щелкаем “ОК”.

В результате в этой ячейке окажется результат ячейки C2, в которой мы объединили первоначальные значения ячеек B2 и D2.

Теперь, после того, как мы вставили результат в ячейку D2, можно удалить лишние ячейки, которые теперь не нужны (B2 и С2). Для этого выбираем лишние ячейки/столбцы левой кнопкой мыши, далее по выделенному диапазону щелкаем правой кнопкой мыши и в открывшемся меню выбираем “Удалить”.

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

Заключение

Таким образом, в обычном объединении ячеек ничего сложного нет. А вот чтобы объединить ячейки сохранив данные придётся слегка потрудиться. Но все же эта задача вполне выполнимая благодаря удобному функционалу программы Excel. Главное – запастись терпением и соблюдать правильную последовательность действий. Рекомендуем перед началом работы на всякий случай сделать копию документа, если вдруг что-то не получится и данные будут утеряны.

Примечание: Все вышеописанные операции можно применять в отношении как ячеек столбца (нескольких столбцов), так и в отношении ячеек строк (нескольких строк). Очередность действий и доступность функций при этом остается одинаковой.

Объединение ячеек в Excel без потери данных

В руководстве описываются различные методы быстрого объединения двух или нескольких ячеек в Excel без потери данных.

В таблицах Эксель вам часто может потребоваться соединить две или более ячейки в одну большую.  Например, это может быть полезно для лучшего представления данных. В других случаях может оказаться слишком много содержимого для отображения в одной клетке таблицы, и вы решите соединить ее с соседними пустыми.

Какова бы ни была причина, слияние ячеек в Excel не такая простая вещь, как может показаться. Если по крайней мере две из них, которые вы пытаетесь объединить, содержат данные, то стандартная функция слияния сохранит только значение левой верхней и уничтожит данные в остальных.

Но есть ли способ объединить ячейки в Эксель без потери данных? Конечно, есть. 

Об этом, а также о других особенностях и способах объединения ячеек, строк и столбцов в Excel мы поговорим далее:

• Инструмент «Слияние и центрирование»
• Ограничения и особенности встроенных инструментов объединения
• Как объединить ячейки в Excel без потери данных
• Объединение столбцов без потери данных
• Превращаем несколько столбцов в один через Блокнот
• Как быстро найти объединенные ячейки
• Альтернативы объединению ячеек
• Надстройка Merge Cells — способ объединения ячеек, столбцов или строк в Excel без формул

Функция слияния и центрирования.

Самый быстрый и простой способ соединить две или более ячеек в Excel — использовать встроенную опцию «Объединить и центрировать». Весь процесс занимает всего 2 быстрых шага:

• Выделите диапазон, который хотите объединить.
• На вкладке » Главная» щелкните

В этом примере у нас есть список фруктов в A2, и мы хотим его собрать воедино с парой пустых ячеек справа (B2 и C2), чтобы создать одну большую, в которой уместится весь список.

После того, как вы нажмете кнопку, A2,B2 и C2 превратятся в одну, а текст будет центрирован, как на этом скриншоте:

Другие стандартные способы, предлагаемые Excel.

Чтобы получить доступ к еще нескольким параметрам интегрирования, предоставляемым Excel, щелкните маленькую стрелку раскрывающегося списка рядом с кнопкой 

и выберите нужный вариант из раскрывающегося меню:

Объединить по строкам  — соединить выделенные ячейки в каждой строке отдельно:

Объединить ячейки — слить выбранные в одну без центрирования текста. Текст по умолчанию будет выровнен по левому краю, число – по правому.
Примечание. Чтобы изменить выравнивание текста после слияния, просто выберите желаемое выравнивание на вкладке «Главная».

И еще хороший способ слияния ячеек – через контекстное меню. Выделите курсором подходящую область, щелкните правой кнопкой мыши, после чего выберите из списка «Формат ячеек».

В появившемся окне выбираем пункт «Выравнивание» и ставим галочку возле «Объединение ячеек». Здесь также можно установить и другие параметры: перенос текста по словам, автоподбор ширины, горизонтальная и вертикальная ориентация текста, различные варианты выравнивания. После того как всё выставлено, жмем «OK».

Думаю, вы помните, что окно форматирования можно также вызвать комбинацией клавиш CTRL + 1.

Ограничения и особенности встроенных инструментов объединения.

При использовании встроенных функций Excel для слияния ячеек следует помнить о нескольких вещах:

• Убедитесь, что все данные, которые вы хотите видеть, введены в крайнюю левую ячейку выбранного диапазона. Ведь сохранится только содержимое левой верхней клетки, данные во всех остальных будут удалены. Если вы хотите интегрировать вместе две или более ячеек с данными в них, ознакомьтесь со следующим разделом чуть ниже.
• Если кнопка  неактивна, скорее всего программа находится в режиме редактирования. Нажмите клавишу Enter, чтобы закончить редактирование, а затем попробуйте выполнить слияние.
• Никакой из стандартных вариантов соединения не работает для данных в таблице Excel. Сначала вам нужно преобразовать таблицу в обычный диапазон. Для этого щелкните таблицу правой кнопкой мыши и выберите в контекстном меню Таблица > Преобразовать в диапазон. А вот затем уже действуйте по инструкции.

Как объединить ячейки в Excel без потери данных

Как уже упоминалось, стандартные функции слияния сохраняют содержимое только верхней левой позиции. И хотя Microsoft внесла в последние версии программы довольно много улучшений, функция слияния, похоже, ускользнула от их внимания. И это критическое ограничение сохраняется даже в Excel 2016 и 2019. Ну, там, где нет очевидного способа, есть обходной путь

Метод 1. Объединенные ячейки в одном столбце (функция «Выровнять»)

Это быстрый и простой метод соединения без потери информации. Однако для этого требуется, чтобы все соединяемые данные находились в одной области в одном столбце.

• Выделите все клетки таблицы, которые хотите объединить.
• Сделайте столбец достаточно широким, чтобы вместить всё содержимое.
• На вкладке «Главная » используйте « Заполнить» > «Выровнять» >. При этом все содержимое переместится на самый верх диапазона.

• Выберите стиль выравнивания в зависимости от того, хотите ли вы видеть итоговый текст по центру или же нет.

Если получившиеся значения распределяются по двум или более строкам, сделайте столбец немного шире.

Этот метод слияния прост в использовании, однако он имеет ряд ограничений:

• Вы можете объединять только в одной колонке.
• Он работает только для текста, числовые значения или формулы не могут быть обработаны таким образом.
• Это не работает, если между объединяемыми попадаются пустые ячейки.

Метод 2. Используйте функцию СЦЕПИТЬ

Пользователям, которым удобнее пользоваться формулами, может понравиться этот способ создать объединенные ячейки в Excel. Вы можете использовать функцию СЦЕПИТЬ или оператор &, чтобы сначала объединить значения, а затем при необходимости соединить и сами ячейки. 

Предположим, вы хотите соединить A2 и B2. И там, и там имеются данные. Чтобы не потерять информацию во время слияния, можно использовать любое из следующих выражений:

=СЦЕПИТЬ(A2;» «;B2)

=A2&» «&B2

Формулу мы запишем в D2. И теперь у нас уже целых 3 позиции: две исходных и одна объединённая. Далее потребуется несколько дополнительных шагов:

• Скопируйте D2 в буфер обмена (можно использовать CTRL + C).
• Вставьте скопированное значение в верхнюю левую позицию диапазона, который вы хотите объединить (в A2). Для этого щелкните ее правой кнопкой мыши и выберите «Специальная вставка»> «Значения» в контекстном меню.
• Теперь можно удалить содержимое B2 и D2 — нам оно больше не понадобится, только мешать будет.
• Выделите позиции, которые вы хотите соединить (A2 и B2), и затем — .

Аналогичным образом вы можете соединить и несколько ячеек. Только формула СЦЕПИТЬ в этом случае будет немного длиннее. Преимущество этого подхода в том, что вы можете использовать разные разделители в одном выражении, например:

=СЦЕПИТЬ(A2; «: «; B2; «, «; C2)

Вы можете найти больше примеров как получить объединенные ячейки в Excel в этом руководстве — СЦЕПИТЬ в Excel: как объединить текстовые строки, ячейки и столбцы .

Как объединить столбцы без потери данных?

Предположим, у вас есть информация о клиентах, где в первом столбце записана фамилия, а во втором – имя. Вы хотите объединить их, чтобы фамилия и имя были записаны вместе.

Используем такой же подход с использованием формул, который мы только что рассмотрели выше.

1. Вставьте новый столбец в вашу таблицу. Поместите указатель мыши в заголовок столбца (в нашем случае это D), затем щелкните правой кнопкой мыши и выберите «Вставить» из контекстного меню. Назовем только его «Полное имя».
2. В D2 запишите следующее: =СЦЕПИТЬ(B2;» «;C2)

B2 и C2 — это фамилия и имя соответственно. Обратите внимание, что здесь добавлен еще пробел между кавычками. Это разделитель, который будет вставлен между объединенными именами. Вы можете использовать любой другой символ в качестве разделителя, например, запятую.

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

1. Скопируйте формулу во все остальные позиции колонки Полное имя. 
2. Мы объединили имена и фамилии, но это все еще формула. Если мы удалим Имя и/или Фамилию, соответствующие соединенные данные также исчезнут.

1. Поэтому нужно преобразовать её в значение, чтобы мы могли удалить ненужное из нашего листа. Выделите все заполненные клетки в нашем новом столбце (выберите первую из них и примените комбинацию клавиш Ctrl + Shift + ↓ ).
2. Скопируйте выделенный фрагмент в буфер обмена (Ctrl + C или Ctrl + Ins, в зависимости от того, что вы предпочитаете), затем щелкните правой кнопкой мыши в любом месте этого же фрагмента («Полное имя») и выберите «Специальная вставка» из контекстного меню. Установите переключатель «Значения» и нажмите кнопку «ОК».
3. Удалите колонки «Имя» и «Фамилия», которые уже больше не нужны. Щелкните заголовок B, нажмите и удерживайте Ctrl и щелкните заголовок C (альтернативный способ — выбрать любую клетку на B, нажать Ctrl + Пробел чтобы выделить его целиком, затем — Ctrl + Shift + → для выбора C).

После этого кликните правой кнопкой мыши любой из отмеченных столбцов и выберите «Удалить» в контекстном меню.

Отлично, мы объединили имена из двух столбцов в один!
Хотя на это потребовалось довольно много сил и времени

Превращаем несколько столбцов в один через Блокнот.

Этот способ быстрее, чем предыдущий, он не требует формул, но подходит только для объединения соседних колонок и использования одного и того же разделителя для всех данных.

Вот пример: мы хотим слить вместе 2 колонки с именами и фамилиями.

1. Выберите исходные данные: нажмите B1, далее Shift + → чтобы выбрать C1 , затем — Ctrl + Shift + ↓, чтобы выделить все с имена и фамилии.
2. Скопируйте данные в буфер обмена (Ctrl + C или Ctrl + Ins).
3. Откройте Блокнот: Пуск -> Все программы -> Стандартные -> Блокнот.
4. Вставьте данные из буфера обмена в Блокнот (Ctrl + V или Shift + Ins)

5. Скопируйте символ табуляции в буфер обмена. Для этого нажмите Tab вправо в Блокноте. Курсор переместится вправо. Выделите мышкой эту табуляцию. Затем перенесите ее в буфер обмена при помощи  Ctrl + X.

6. Замените символы табуляции в Блокноте на нужный разделитель.

Вам нужна комбинация Ctrl + H, чтобы открыть диалоговое окно «Заменить», вставьте символ табуляции из буфера обмена в поле «Что». Введите разделитель, например, пробел, запятая и т.д. в поле «Чем». Затем жмем кнопку «Заменить все». Закрываем.

1. Нажмите Ctr + A, чтобы выделить весь текст в Блокноте, затем — Ctrl + C , чтобы скопировать в буфер обмена.
2. Вернитесь к листу Excel (можно при помощи Alt + Tab), выберите только B1 и вставьте текст из буфера обмена в свою таблицу.
3. Переименуйте столбец B в «Полное имя» и удалите «Фамилия».

Здесь больше шагов, чем в предыдущем варианте, но попробуйте сами — этот способ быстрее. 

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

Чтобы найти такие области, выполните следующие действия:

• Нажмите Ctrl + F, чтобы открыть диалоговое окно «Найти и заменить», или найдите на ленте «Найти и выделить» > « Найти» .
• На вкладке «Найти » щелкните Параметры > Формат .

1. На вкладке «Выравнивание» выберите поле «Объединить ячейки» и нажмите кнопку «ОК» .
2. Наконец, жмём «Найти далее», чтобы перейти к следующей объединенной ячейке, либо «Найти все», чтобы найти их все на листе. Если вы выберете последнее, Microsoft Excel отобразит список всех найденных объединений и позволит вам перемещаться между ними, указывая одну из них в этом списке:

Как разделить ячейки в Excel

Если вы передумали сразу после слияния ячеек, вы можете быстро отменить это. Поможет комбинация Ctrl + Z или кнопка «Отменить» на панели быстрого доступа.

Чтобы разделить обратно ранее объединенную ячейку, выберите ее и кликните  или щелкните маленькую стрелку рядом с этой кнопкой и выберите «Отменить…» :

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

Альтернативы объединению ячеек.

Само собой разумеется, что такие ячейки могут помочь представить информацию в ваших таблицах лучше и осмысленнее … но они порождают множество неприятных побочных эффектов, о которых вы, возможно, даже не подозреваете. Вот несколько из них:

1. Ни автозаполнение, ни функция заполнения перетаскиванием не работают, если диапазон заполняемых ячеек содержит объединенные.
2. Вы не сможете преобразовать в таблицу Excel диапазон, содержащий такие ячейки.
3. Вы не сможете создать на основе этих данных сводную таблицу.
4. Невозможно отсортировать колонки, содержащие как объединенные, так и обычные ячейки.
5. Если вы пользуетесь «горячими» клавишами для навигации, например переходите в начало или конец таблицы путем сочетания клавиш Ctrl + стрелка вверх или вниз, то теперь такое не получится. Курсор будет «упираться» в объединенные ячейки.
6. Если вы выделяете столбцы (или строки) с помощью горячих клавиш Ctrl (Shift) + Пробел, то теперь вы не сможете выделить один столбец (или строку).
7. Не получится воспользоваться автоматическим выравниванием ширины и высоты. Например, если вы соединили A1 и B1, то автоматическое выравнивание ширины столбца A теперь работать не будет.

Итак, я бы посоветовал дважды подумать перед слиянием ячеек в Экселе и делать это только тогда, когда это действительно необходимо для презентации или аналогичных целей, например, для центрирования заголовка таблицы по всей таблице.

Если вы хотите соединить ячейки где-то в середине листа, вы можете рассмотреть возможность использования функции «По центру выделения» в качестве альтернативы:

1. Выберите ячейки, которые вы хотите присоединить, в этом примере B4 и C4.
2. Используйте  Ctrl + 1, чтобы открыть окно форматирования.
3. Перейдите на вкладку «Выравнивание» и активируйте опцию «По центру выделения» в раскрывающемся списке «По горизонтали» , а затем — «ОК».

По внешнему виду результат будет неотличим от объединенной ячейки:

Чтобы доказать, что мы действительно не соединили две ячейки, можем выбрать каждую из них по отдельности.

Надстройка Merge Cells — способ объединения ячеек, столбцов или строк в Excel без формул

С помощью надстройки Merge Cells, входящей в Ultimate Suite for Excel , вы можете быстро и эффективно выполнить следующие действия:

• Объединить несколько ячеек в одну без потери данных.
• Объединить значения нескольких ячеек в одну и разделить их любым разделителем по вашему выбору.

Инструмент объединения ячеек работает со всеми версиями Excel и может объединять все типы данных, включая текст, числа, даты и специальные символы. Два его ключевых преимущества — простота и скорость. Любое объединение выполняется всего за пару кликов. А теперь позвольте мне показать вам это в действии.

Объединить значения нескольких ячеек в одну ячейку

Чтобы объединить содержимое нескольких ячеек, вы выбираете в меню “Merge cells into One”, указываете диапазон для объединения и устанавливаете следующие параметры:

• Объединять ячейки в одну;
• Выберите нужный разделитель в выпадающем списке «Разделять значения с помощью», в данном примере это запятая и пробел;
• Выбирайте, где вы хотите разместить результат, а главное
• Снимите флажок «Merge all areas in selection». Именно этот параметр определяет, объединяются ли ячейки вместе с их значениями или значения объединяются в указанной ячейке.

Как видите, мы объединили содержимое шести ячеек, пропустив две пустые из них. В качестве разделителей использовали запятую с пробелом после нее. Стандартными средствами Excel это сделать не получится, а написание формулы займет достаточно много времени. А здесь нам понадобилась всего пара кликов мышкой.

Как объединить столбцы построчно

Чтобы объединить два или более столбца, вы настраиваете параметры слияния ячеек аналогичным образом, но выбираете столбцы (Columns into One) в разделе «Что объединить (How to merge)»:

На рисунке выше вы видите пример такого объединения. В качестве разделителей вновь использеум запятую с пробелом, объединяем содержимое всех столбцов в крайний левый построчно. Рекомендую не забыть устанавливать автоматический перенос текста, чтобы не пришлось делать результирующий столбец сликом широким, дабы уместить в нем все результаты.

Соединение строк столбец за столбцом

Чтобы объединить данные построчно, столбец за столбцом, вы выбираете объединение строк  (Rows into One), указываете нужный разделитель нужный разделитель (перенос строки в этом примере), настраиваете другие параметры так, как это необходимо, и нажимаете кнопку «Объединить (Merge)». Результат может выглядеть примерно так:

Чтобы проверить, как надстройка Merge Cells справится с вашими наборами данных, вы можете использовать приведенную ниже ссылку, чтобы загрузить полнофункциональную пробную версию Ultimate Suite.

Мы рассказали вам про объединение ячеек  в Excel без потери данных. Надеюсь, эта информация оказалась полезной для ваших повседневных задач. Благодарю вас за чтение и надеюсь еще увидеть в нашем блоге.

Также статьи по теме:

Формат времени в Excel — Вы узнаете об особенностях формата времени Excel, как записать его в часах, минутах или секундах, как перевести в число или текст, а также о том, как добавить время с помощью…

Как сделать диаграмму Ганта — Думаю, каждый пользователь Excel знает, что такое диаграмма и как ее создать. Однако один вид графиков остается достаточно сложным для многих — это диаграмма Ганта.  В этом кратком руководстве я постараюсь показать…

Как сделать автозаполнение в Excel — В этой статье рассматривается функция автозаполнения Excel. Вы узнаете, как заполнять ряды чисел, дат и других данных, создавать и использовать настраиваемые списки в Excel. Эта статья также позволяет вам убедиться, что вы…

Быстрое удаление пустых столбцов в Excel — В этом руководстве вы узнаете, как можно легко удалить пустые столбцы в Excel с помощью макроса, формулы и даже простым нажатием кнопки. Как бы банально это ни звучало, удаление пустых…

Как быстро объединить несколько файлов Excel — Мы рассмотрим три способа объединения файлов Excel в один: путем копирования листов, запуска макроса VBA и использования инструмента «Копировать рабочие листы» из надстройки Ultimate Suite. Намного проще обрабатывать данные в…

Ранее уже рассказывал о замечательной функции в программе Excel,  которая называется «СЦЕПИТЬ».

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

Для больших объемов сцепки (слияния текста)  требуются значительные трудозатраты.

Достойных аналогов этой функции, к сожалению, найти не удалось.

На помощь пришел язык VBA для написания макросов в «Excel».

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

Макрос слияния выглядит следующим образом:

1. Sub Sliyanie()
2. Dim txt As String ‘Объявляем переменную ТХТ
3. txt = «» ‘присваиваем объявленной переменной пустое значение
4. Dim cell
5. For Each cell In Selection ‘ для всех ячеек в выделении выполняем следующие действия
6. txt = txt + cell.text ‘к значению переменной txt добавляем значение ячейки
7. Next
8. MsgBox (txt) ‘выводим итоговое значение
9. End Sub

Это самый простой вариант макроса слияния текстовых значений ячеек в выделенном диапазоне.

Его можно усложнить и оптимизировать под выполнение Вашей конкретной задачи.

Например:

Добавить форму UserForm с двумя полями TextBox. В одном поле указывать разделитель ( «/», «;», «.», и т.д.) а в другое поле выводить результат для удобства копирования.

Можно на форму UserForm вывести кнопки активации макроса «Соединить» и для ленивых кнопку «Копировать» — для копирования содержимого поля с результатом в буфер обмена.

Макрос копирования по ссылке: http://ruexcel.ru/ctrlc/

Можно добавить чек бокс (checkbox) для выбора учитывать пустые ячейки или пропускать их.

Вариаций очень много и их набор зависит только от задачи, которую будет выполнять макрос слияния ячеек.