Как скрепить два столбца в Excel: от простого к сложному

Работа с данными в Microsoft Excel часто требует объединения информации из разных ячеек. Например, когда нужно создать полное ФИО из отдельных столбцов с фамилией и именем, сгенерировать уникальные идентификаторы или подготовить данные для импорта в другую систему. Скрепить два столбца — задача, с которой сталкиваются и новички, и опытные пользователи, но не все знают о всех возможных методах.

Многие ошибочно считают, что для этого достаточно нажать кнопку "Объединить и поместить в центре" на панели инструментов. Однако этот способ имеет критические недостатки: он удаляет данные из одной из ячеек и оставляет только первое значение. В результате вы теряете часть информации, а восстановить её можно только через отмену действия (Ctrl+Z). Правильные методы объединения сохраняют все данные и предлагают гибкие настройки.

В этой статье мы разберём 5 проверенных способов скрепления столбцов — от элементарных до автоматизированных с помощью VBA. Вы узнаете, как объединять текст с разделителями, числа с сохранением формата, а также как избежать типичных ошибок при работе с большими таблицами.

Способ 1: Объединение через символ "&" (конкатенация)

Самый универсальный и безопасный метод — использование оператора & (амперсанд). Он позволяет склеивать содержимое ячеек без потери данных, добавляя при необходимости разделители (пробел, запятая, тире и др.). Формула работает во всех версиях Excel, включая Excel 365 и Excel Online.

Предположим, у вас есть столбец A с фамилиями и столбец B с именами. Чтобы получить полное ФИО в столбце C, введите в ячейку C1:

=A1 & " " & B1

Здесь " " — это пробел между фамилией и именем. Если нужно добавить запятую или другой символ, замените пробел на "," или "-".

• ✅ Плюсы: Сохраняет все данные, работает с текстом и числами, поддерживает динамическое обновление.
• ⚠️ Минусы: Требует ручного ввода формулы для каждой строки (решается протягиванием маркера автозаполнения).
• 🔄 Альтернатива: Функция CONCATENATE (устаревшая, но всё ещё работает в старых версиях).

⚠️ Внимание: Если в ячейках есть числа, Excel может автоматически преобразовать их в даты. Например, 1-5 станет 1 мая. Чтобы избежать этого, используйте функцию TEXT:

=TEXT(A1,"0") & "-" & TEXT(B1,"0")

Способ 2: Функция CONCAT (Excel 2016 и новее)

В современных версиях Excel (начиная с 2016) появилась функция CONCAT, которая заменяет устаревшую CONCATENATE. Она более гибкая: позволяет объединять не только отдельные ячейки, но и целые диапазоны.

Синтаксис простой:

=CONCAT(диапазон1; [диапазон2]; ...)

Пример для объединения столбцов A и B с пробелом:

=CONCAT(A1:B1 & " ")

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

Способ 3: Функция TEXTJOIN (для сложных разделителей)

Если вам нужно объединить столбцы с уникальным разделителем (например, точкой с запятой для CSV-файлов) или пропустить пустые ячейки, используйте TEXTJOIN. Эта функция появилась в Excel 2019 и Excel 365.

Синтаксис:

=TEXTJOIN(разделитель; пропускать_пустые; текст1; [текст2]; ...)

Примеры:

• 📌 =TEXTJOIN("; ", ИСТИНА, A1:B1) → Иванов; Пётр (с разделителем и игнорированием пустых ячеек).
• 📌 =TEXTJOIN(",", ЛОЖЬ, A1:C1) → Иванов,Пётр,Сергеевич (все значения через запятую, включая пустые).

⚠️ Внимание: Если в ячейках есть формулы, возвращающие пустую строку (""), TEXTJOIN будет учитывать их как непустые значения при параметре ЛОЖЬ. Чтобы избежать лишних разделителей, используйте ИСТИНА.

Эта функция незаменима для подготовки данных к экспорту в другие системы, где требуется строгий формат (например, JSON или SQL-запросы).

=TEXTJOIN(CHAR(10), ИСТИНА, A1:B1)

Способ 4: Объединение с сохранением форматирования

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

1. Копирование формата: Объедините данные любым способом (например, через &), затем вручную примените форматирование к результирующей ячейке.
2. Использование Power Query:
   1. Выделите таблицу → Данные → Из таблицы/диапазона.
   2. В редакторе Power Query выберите столбцы → Преобразовать → Объединить столбцы.
   3. Укажите разделитель и подтвердите.

Sub CombineColumns()
Dim ws As Worksheet
Dim rng1 As Range, rng2 As Range, output As Range
Dim i As Long, lastRow As Long

Set ws = ActiveSheet
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

Set rng1 = ws.Range("A1:A" & lastRow) ' Первый столбец
Set rng2 = ws.Range("B1:B" & lastRow) ' Второй столбец
Set output = ws.Range("C1:C" & lastRow) ' Результирующий столбец

For i = 1 To lastRow
output.Cells(i, 1).Value = rng1.Cells(i, 1).Value & " " & rng2.Cells(i, 1).Value
Next i
End Sub

=LEN(C1)

Sub CombineWithHyperlinks()
Dim ws As Worksheet
Dim rng1 As Range, rng2 As Range, output As Range
Dim i As Long, lastRow As Long

Set ws = ActiveSheet
lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

For i = 1 To lastRow
ws.Range("C" & i).Value = ws.Range("A" & i).Value & " " & ws.Range("B" & i).Value
If ws.Range("A" & i).Hyperlinks.Count > 0 Then
ws.Hyperlinks.Add Anchor:=ws.Range("C" & i), Address:=ws.Range("A" & i).Hyperlinks(1).Address
End If
Next i
End Sub