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

Как объединить текст (значения) ячеек при помощи формул?

Стандартное средство Excel для объединения значений нескольких ячеек в одной ячейке - это функция "СЦЕПИТЬ", позволяющая объединять до 255 текстовых значений в одно. Объединяемые элементы могут быть как текстовыми, так и числовыми, а также ссылками на ячейки или сочетанием этих элементов. Функция "СЦЕПИТЬ" находится в категории "Текстовые", вызвать ее можно как через мастер функций, так и через вкладку "Формулы", которая находится на ленте Excel 2007 и выше.

Если ячейка A1 листа содержит имя человека, в ячейке B1 содержится его отчество, а в ячейке C1 - фамилия, объединить эти три значения в отдельной ячейке можно с помощью следующей формулы:

=СЦЕПИТЬ(A1," ",B1," ",C1)

Для объединения текстовых элементов вместо функции "СЦЕПИТЬ" можно также использовать оператор & (амперсанд). Например, формула

=A1 & B1 & C1

возвращает то же значение, что и вышеописанная формула.

Объединение текста (значений) разных ячеек Excel макросом

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

Sub obedinenie_teksta()
' Объединение текста ячеек выделенного диапазона
 Dim iCell As Range
 Dim Str As String
    For Each iCell In Selection
        Str = Str & iCell.Value
    Next iCell
'Вывод объединенного текста в ячейку "A1"
 Range("A1") = Str
'Вывод объединенного текста в сообщение
 MsgBox Str
End Sub

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

Sub obedinenie_teksta_s_razdelitelyami()
'Объединение текста в ячейках выделенного диапазона с использованием разделителя
 Dim i As Long
 Dim Str As String
 Dim Razdelitel As String
    Razdelitel = ";"
    Str = Selection.Cells(1)
        For i = 2 To Selection.Cells.Count
            Str = Str & Razdelitel & Selection.Cells(i).Value
        Next i
'Вывод объединенного текста в ячейку "A1"
    Range("A1") = Str
'Вывод объединенного текста в сообщении
    MsgBox Str
End Sub

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

Надстройка для объединения текста из разных ячеек

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

Надстройка позволяет:

1) объединять значения по строкам;

2) объединять значения по столбцам;

3) объединять значения по произвольным диапазонам;

4) делать отступы;

5) устанавливать знак-разделитель;

6) изменять направление объединения ячеек:

а) сначала слева направо, затем сверху вниз;

б) сначала сверху вниз, затем слева направо.

kak bystro scepit znacheniya yacheek

smotret videoвидео по работе с надстройкой

Downloadскачать надстройку для объединения ячеек без потери текста