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

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

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

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

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

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

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

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

Как видим, после этого ячейки объединились не в одну общую ячейку, а приняли построчное объединение.

Объединение через контекстное меню

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

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

Как видим, произошло объединение ячеек.

Объединение без потерь

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

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

Открывается окошко, в котором нужно переставить переключатель в положение «Добавить столбец». Делаем это, и кликаем по кнопке «OK».

В ячейке, образовавшейся между теми ячейками, которые мы собираемся объединить, ставим значение без кавычек «=СЦЕПИТЬ(X;Y)», где X и Y – это координаты соединяемых ячеек, после добавление столбца. Например, чтобы объединить таким способом ячейки A2 и C2, в ячейку B2 вставляем выражение «=СЦЕПИТЬ(A2;C2)».

Как видим, после этого, символы в общей ячейке «склеились».

Но, теперь вместо одной объединённой ячейки мы имеем три: две ячейки с первоначальными данными, и одну объединенную. Чтобы сделать одну ячейку, кликаем по объединенной ячейке правой кнопкой мыши, и в контекстном меню выбираем пункт «Копировать».

Затем, перемещаемся в правую ячейку с первоначальными данными, и, кликнув по ней, выбираем в параметрах вставки пункт «Значения».

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

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

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

Как видим, если обычное объединение ячеек в программе Microsoft Excel довольно простое, то с объединением ячеек без потерь придется повозиться. Тем не менее, это тоже выполнимая задача для данной программы.

Иногда эксель удивляет своими требованиями делать что-то через э… макросы. Вот недавно, встала задача разбить несколько объединенных ячеек по одной, чтобы можно было нормально отсортировать весь диапазон. Думаю, никому не надо объяснять, как просто убрать объединение ячеек, разбив их по одной (я имею ввиду формат-выравнивание-убрать галку с «объединение ячеек»). Но, к сожалению, эксель обладает очень интересным свойством при отмене объединения ячеек не спрашивать, как именно мы хотели бы их вернуть в нормальное, разъединенное состояние, а тупо пишет в верхнюю левую ячейку значение, которое было в объединенной, а все остальные ячейки оставляет незаполненными. Ну, естественно, ни о какой нормальной сортировке по прежде объединенным ячейкам говорить не приходится. И хорошо бы их было всего штук 200-300. А если их шестьдесят тысяч, разбитых на группы по 10 ячеек? Вручную шесть тысяч значений потом копировать в оставшиеся пустыми ячейки?

Типичная картина — хотим отсортировать список пофамильно, чтобы Кузнецов шел все-таки после Иванова. Пример, разумеется, очень упрощенный.

Просто так отсортировать таблицу эксель нам не даст — ячейки-то объеденены. Но и если мы отменим объединение, то каждая фамилия запишется только в верхнюю ячейку, и остальные придется дозаполнять. Получится вот так вот:

А нам то надо, чтобы в каждой ячейке было соответствующее значение, иначе при сортировке получится черти что!

К сожалению, выполнить это стандартными средствами экселя, как например, мы или — невозможно. Необходимо использовать макросы. Но, слава богу, есть добрые люди на свете, которые уже сделали это до нас. Причем — написали даже не один макрос, а целых несколько. При этом макросы позволяют не только разделять ячейки с сохранением содержащейся в них информации, но и многое другое:

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

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

Итак, создаем макрос с кодом:

ABAP

Sub UnMerge_And_Fill_By_Value() " разгруппировать все ячейки в Selection и ячейки каждой бывшей группы заполнить значениями из их первых ячеек Dim Address As String Dim Cell As Range If TypeName(Selection) <> "Range" Then Exit Sub End If If Selection.Cells.Count = 1 Then Exit Sub End If Application.ScreenUpdating = False For Each Cell In Intersect(Selection, ActiveSheet.UsedRange).Cells If Cell.MergeCells Then Address = Cell.MergeArea.Address Cell.UnMerge Range(Address).Value = Cell.Value End If Next End Sub

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

Только не надо забывать, что после выполнения макроса, отменить эту операцию нельзя. Поэтому лучше работать с копией таблицы.

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

Тоже на всякий случай приведу код:

ABAP

Sub MergeCls() Dim ri As Integer, r2 As Integer, Col As Integer r1 = ActiveCell.Row r2 = ActiveCell.Row Col = ActiveCell.Column Do If Cells(r1, Col) <> Cells(r2 + 1, Col) Then If r1 <> r2 Then Range(Cells(r1 + 1, Col), Cells(r2, Col)).ClearContents With Range(Cells(r1, Col), Cells(r2, Col)) .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenter .WrapText = True .Orientation = 0 .AddIndent = False .IndentLevel = 0 .ShrinkToFit = False .ReadingOrder = xlContext .MergeCells = True End With End If r1 = r2 + 1 End If r2 = r2 + 1 Loop Until Cells(r2, Col) = "" End Sub

class="eliadunit">

При необходимости в программе Excel имеется возможность объедения данные из нескольких ячеек в одну. Склеить можно как однотипные данные (число+число) так и разнотипные (число+слово). Эти операция проделываются при помощи формулы СПЕЦИТЬ (или в английском варианте CONCATENATE). Аналогом этой формулы является использование знака под названием амперсанд (&). Научиться использовать сцепление в Excel лучше на реальных примерах.

Первый пример: использование объединение слов в одну ячейку в Excel (например, при написании объявлений в Яндекс Директ). Задача: добавить к тексту объявления слова «Звоните!» и «Звоните сейчас!». В столбце B находится текст объявления, в столбце C – слово «Звоните», в следующем столбце: «!» или «сейчас!»:

С целью масштабного объединения в столбце A вставляем формулы (знак амперсанд вставляется при английской раскладке Shift+7):

=СЦЕПИТЬ(B1;" ";C1;D1)

=B2&" "&C2&D2

=СЦЕПИТЬ(B3;" ";C3;D3)

=B4&" "&C4&D4

class="eliadunit">

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

Обычно подобное объединение используют к тексту и соответственно формула СЦЕПИТЬ относится к текстовым. Но её можно использовать и с числами. Вот пример:

Стоит обратить внимание на то, что с полученными результатами можно работать как с числами. Суммировать, умножать, делить и т.д. Но использовать в числовой формуле не получить. Например, если в ячейки суммы прописать формулу =СУММ (A2:A5), то подсчёт составит 0.

Далее разберем пример, когда нужно объединить текст и ячейку с числом, к которой применен какой-либо формат отображения (дата, финансы и др.). Если использовать только амперсанд или формулу СЦЕПИТЬ, требуемое значение будет отображаться некорректно (столбец A):

Для правильного отображения (столбец B), нужно использовать формулу ТЕКСТ. Её синтаксис следующий: ТЕКСТ(номер ячейки или значение;« формат числового значения»). С форматами можно познакомиться в меню Excel во вкладке «Главная», раздел «Число».

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

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

Используем контекстное меню

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

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

Если в объединяемые блоки был вписан текст, программа выдаст следующее сообщение: все значения будут удалены, кроме левого верхнего.

После объединения, осталось слово «объединим» , вместо «объединим эти ячейки» .

Используем кнопочку на ленте

Выделяем нужные блоки, переходим на вкладку «Главная» и кликаем на кнопочку «Объединить и поместить в центре» .

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

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

Копируем ранее объединенные

Если в документе у Вас уже есть объединенные блоки с нужным текстом, то выделите их, скопируйте – используя комбинацию «Ctrl+C» , и вставьте в нужную область документа – «Ctrl+V» .

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

Использование функции СЦЕПИТЬ

Четвертый способ – объединим ячейки в Excel, сохранив данные, используя функцию «СЦЕПИТЬ» . Объединять будем А1 —В1 и А2 —В2 .

Добавим между ними дополнительный столбец. Выделяем В1 , на вкладке «Главная» кликаем по стрелочке возле кнопки «Вставить» и выбираем из списка «Вставить столбцы на лист» .

Дальше выделяем В1 , в нее вставился новый столбец, и прописываем следующую формулу, чтобы сцепить А1 —С1 : =СЦЕПИТЬ(А1;» «;С1) . В кавычках посредине впишите разделитель: «;» , «:» , «,» , у меня там стоит пробел.

Таким же образом объединяем А2 —С2 . Можно просто растянуть формулу по столбцу, потянув за правый нижний уголок В1 .

Для того чтобы оставить в таблице только объединенные ячейки, выделяем их и нажимаем «Ctrl+C» . Кликаем по ним правой кнопкой мыши и выбираем из меню «Специальная вставка» – «Значения» .

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

Удалим столбец А и С . Выделяем А1:А2 , на вкладке «Главная» нажимаем на стрелочку возле кнопки «Удалить» и выбираем из списка «Удалить столбцы с листа» . Также удаляем данные в С1:С2 .

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

Использование макросов

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

Запускаем редактор VBA, используя комбинацию клавиш «Alt+F11» , и создаем новый модуль.

Теперь в область для ввода VBA-кода вставляю следующий код. Макрос будет называться «MergeCell» . Сохраняем созданный макрос. Если у Вас Excel 2007 и выше, при сохранении документа в поле «Тип файла» выберите «Книга Excel с поддержкой макросов» .

Закрываем редактор VBA комбинацией «Alt+Q» , после этого откроется документ Excel.

Теперь нужно выполнить созданный макрос. Выделяем в документе ячейки, которые нужно объединить. Переходим на вкладку Разработчик и кликаем по кнопочке «Макросы» . В следующем окне выбираем из списка макрос с нужным названием – «MergeCell» , и нажимаем «Выполнить» .

Выделенные блоки объединены, и при этом данные сохранились. Чтобы текст нормально отображался в ячейке, перейдите на вкладку «Главная» и кликните по кнопочке «Перенос текста» .

Думаю рассмотренных способов достаточно, чтобы объединить данные или текст в ячейках Excel. При этом Вы можете сделать так, чтобы данные в объединенных ячейках не были удалены.