Объединение строк в Microsoft Excel. Объединение ячеек в Microsoft Excel

Бытовая техника 18.09.2019
Бытовая техника

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

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

После выделения нужных вам ячеек можете продолжать операцию. Далее войдите в меню настроек ячейки. Это удается сделать двумя способами. Быстрее всего получается нажатием комбинаций ctrl+1. Если перед вами часто возникает такая задача, то лучше запомнить данное сочетание ради экономия времени. Другой способ состоит в выборе пункта меню «Формат» в левой верхней части окна Excel. А после открытия меню выбираем пункт «Ячейки».

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

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

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

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

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

Ячейки, образующие прямоугольник (соприкасающиеся между собой хотябы одной из сторон) можно объединять в одну большую ячейку, имеющую общий формат. Объединять ячейки можно как стандартными средствами Excel, так и с использованием макросов и надстроек. При объединении ячеек с данными стандартными способами информация ячеек заменяется текстом верхней левой ячейки объединяемого диапазона. Использование макросов и надстроек позволяет существенно ускорить и упростить этот вид операций, а также сохранить значения всех объединяемых ячеек.

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

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

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

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

Использование надстройки позволяет:

1. Одним кликом мыши вызывать диалоговое окно макроса прямо из панели инструментов Excel;

2. объединять ячейки по строкам;

3. объединять ячейки по столбцам;

4. при объединении ячеек с текстом, сохранять текстовые данные всех объединяемых ячеек;

5. выбирать на свое усмотрение символ знака-разделителя (символ, отделяющий текст одной ячейки, от текста другой);

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

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

8. выборочно объединять ячейки с заданным шагом.

Видео по быстрому объединению ячеек без потери значений

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

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

Самый простой способ объединить ячейки - выделить диапазон объединяемых ячеек, кликнуть правой кнопкой мыши в любом месте выделенной области и в появившемся контекстном меню выбрать пункт "Формат ячеек...". Далее в окне "Формат ячеек" перейти на вкладку "Выравнивание", в группе "Отображение" поставить галочку перед полем "Объединение ячеек" и нажать кнопку "ОК".

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

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

В Excel 2007/2010 аналогичная кнопка находится на вкладке "Главная", в группе кнопок "Выравнивание". Если зайти в меню этой кнопки, нажав небольшую стрелочку правее кнопки, то кроме опции "Объединить и поместить в центре" станут доступны "Объединить по строкам", "Объединить ячейки" и "Отменить объединение ячеек".

Почему пункты меню и кнопки для объединения ячеек неактивны

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

Как объединять ячейки в Excel при помощи горячих клавиш?

Объединение ячеек можно несколько ускорить, если скопировать объединенную ячейку, а затем вставлять ее в нужные места, используя сочетания горячих клавиш Ctrl+C для копирования и Ctrl+V для вставки. Кроме этого можно написать простейший макрос (либо записать его макрорекордером ) и присвоить этому макросу свое сочетание горячих клавиш , например Ctrl+M. Примерный код простейшего макроса приведен ниже.

Sub Obedinenie_Vydelennyh_Yacheek() Selection.MergeCells = True End Sub

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

У пользователей, только начинающих работать с редактором таблиц Excel , часто возникает вопрос, как объединить ячейки в excel.

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

Все они достаточно простые для того, чтобы научиться пользоваться всего за пару приёмов, воспользовавшись следующими советами.

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

При этом они выравниваются по центру, соединяются по строкам или просто совмещаются с оставлением прежнего форматирования.

Совет! Лучше всего проводить объединение заранее, с ещё пустыми ячейками, так как после процедуры информация остаётся только в крайней левой ячейке сверху.

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

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

Порядок действия следующий:

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

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

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

Спасти данные можно, заранее скопировав их в другую область, а уже после совмещения присоединить к оставшемуся тексту

Объединение через панель инструментов

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

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

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

На панели Excel 2007/2010/2013 такая кнопка тоже есть, на вкладке «Главная» (группа «Выравнивание»).

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

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

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

Объединить столбцы даже в этой версии невозможно.

Иногда область не удаётся объединить, а кнопки и команды остаются неактивными. Так происходит, если на листе установлена защита или к книге (документу) разрешён только общий доступ.

Перед соединением областей необходимо удалить все эти условия, открыв возможность к форматированию таблицы.

Функция для объединения текста

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

Сделать это несложно:

  1. Сначала выбирается ячейка недалеко от объединяемых областей и форматируется нужным образом (например, делается размером 3х3 или 2х6);
  2. В ней пишется формула типа СЦЕПИТЬ (А1; А2), где указываются ячейки (по одной!), текст из которых будет объединяться).

Результатом станет объединённое поле типа:

Информация в области D1:F8 из ячеек А1 и С3, соединённая без потери текста

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 объединять значения в одну ячейку.

Иногда эксель удивляет своими требованиями делать что-то через э… макросы. Вот недавно, встала задача разбить несколько объединенных ячеек по одной, чтобы можно было нормально отсортировать весь диапазон. Думаю, никому не надо объяснять, как просто убрать объединение ячеек, разбив их по одной (я имею ввиду формат-выравнивание-убрать галку с «объединение ячеек»). Но, к сожалению, эксель обладает очень интересным свойством при отмене объединения ячеек не спрашивать, как именно мы хотели бы их вернуть в нормальное, разъединенное состояние, а тупо пишет в верхнюю левую ячейку значение, которое было в объединенной, а все остальные ячейки оставляет незаполненными. Ну, естественно, ни о какой нормальной сортировке по прежде объединенным ячейкам говорить не приходится. И хорошо бы их было всего штук 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

SubUnMerge_And_Fill_By_Value () "разгруппироватьвсеячейкивSelectionиячейкикаждойбывшейгруппызаполнитьзначениямиизихпервыхячеек

DimAddressAs String

DimCellAs Range

If TypeName (Selection) & lt ; & gt ; "Range" Then

Exit Sub

EndIf

If Selection. Cells. Count = 1 Then

Exit Sub

EndIf

Application. ScreenUpdating= False

For EachCellIn Intersect (Selection, ActiveSheet. UsedRange) . Cells

If Cell. MergeCellsThen

Address= Cell. MergeArea. Address

Cell. UnMerge

Range (Address) . Value = Cell. Value

EndIf

Next

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

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

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

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

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

SubMergeCls ()

DimriAs Integer, r2As Integer, ColAs Integer

r1= ActiveCell. Row

r2= ActiveCell. Row

Col= ActiveCell. Column

If Cells (r1, Col) & lt ; & gt ; Cells (r2+ 1 , Col) Then

If r1& lt ; & gt ; r2Then

Range (Cells (r1+ 1 , Col) , Cells (r2, Col) ) . ClearContents

With Range (Cells (r1, Col) , Cells (r2, Col) )



Рекомендуем почитать

Наверх