Объединение текста из двух столбцов в Excel: от простых формул до VBA

Почему стандартное копирование не работает и что делать

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

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

  • 🔹 Соединить фамилию и имя в одном столбце через пробел
  • 🔹 Объединить данные с разделителями (запятая, тире, сlesh)
  • 🔹 Автоматически обновлять объединённые данные при изменении исходных
  • 🔹 Избежать ошибки #ЗНАЧ! при работе с пустыми ячейками

Важно: методы работают во всех версиях Excel 2010–2026 и Office 365, но некоторые функции (например, TEXTJOIN) появились только в Excel 2019+. Мы отметим такие случаи отдельно.

📊 Какую версию Excel вы используете?
Excel 2010-2016
Excel 2019-2021
Office 365 (Microsoft 365)
Mac-версия
Не знаю

Способ 1: Формула СЦЕПИТЬ (CONCATENATE) — классика для всех версий

Функция СЦЕПИТЬ (или CONCATENATE в английской версии) — самый универсальный метод, который работает даже в Excel 2003. Она последовательно соединяет до 255 текстовых аргументов.

Базовый синтаксис:

=СЦЕПИТЬ(текст1; [текст2]; ...)

Пример: объединим содержимое ячеек A2 ("Иванов") и B2 ("Пётр") с пробелом:

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

Результат: "Иванов Пётр".

Убедитесь, что в ячейках нет скрытых пробелов (используйте ПЕЧСИМВ)

Проверьте регистр — функция не исправляет орфографию

Добавьте разделитель (" ", ", ", "-") как отдельный аргумент

-->

Проблема Причина Решение
Формула возвращает #ИМЯ? Опечатка в названии функции Проверьте регистр: СЦЕПИТЬ, а не СЦЕПИТ
Пропущен пробел между словами Забыли добавить аргумент с разделителем Добавьте ; " "; между ячейками
Числа отображаются без форматирования СЦЕПИТЬ преобразует числа в текст Используйте ТЕКСТ для сохранения формата: =СЦЕПИТЬ(ТЕКСТ(A2;"0"))
⚠️ Внимание: Если в одной из ячеек содержится формула (например, =СЕГОДНЯ()), функция СЦЕПИТЬ вернёт не её результат, а саму формулу в текстовом виде. Чтобы получить значение, оберните аргумент в ТЕКСТ:
=СЦЕПИТЬ(ТЕКСТ(СЕГОДНЯ();"дд.мм.гггг"); " — рабочий день")

Способ 2: Оператор & — быстрее и короче

Для тех, кто любит минимализм в формулах, есть оператор & (амперсанд). Он делает то же самое, что и СЦЕПИТЬ, но без лишних символов.

Пример объединения A2 ("Отчёт") и B2 ("2026") с дефисом:

=A2 & "-" & B2

Преимущества метода:

  • 🔹 Компактность: формула занимает меньше места в строке
  • 🔹 Гибкость: можно легко добавлять текстовые элементы: =A2 & " за " & B2 & " год"
  • 🔹 Скорость: Excel обрабатывает операторы быстрее функций

Однако есть и подводные камни. Например, если в одной из ячеек ошибка (#ДЕЛ/0!), она "заразит" всю формулу. Чтобы этого избежать, используйте ЕСЛИОШИБКА:

=ЕСЛИОШИБКА(A2 & " " & B2; "")

Способ 3: TEXTJOIN — современное решение для сложных задач

Функция TEXTJOIN появилась в Excel 2019 и стала настоящим прорывом для работы с текстом. Она умеет:

  • 🔹 Объединять данные с любым разделителем (включая пустую строку)
  • 🔹 Игнорировать пустые ячейки (опция истинна/ложь)
  • 🔹 Обрабатывать целые диапазоны, а не только отдельные ячейки

Синтаксис:

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

Пример: объединим данные из A2:A5 (список имён) через запятую, пропуская пустые ячейки:

=TEXTJOIN(", ";ИСТИНА;A2:A5)

Где это пригодится?

  • 📋 Создание списков email для рассылки
  • 📊 Формирование меток для диаграмм
  • 📝 Генерация SQL-запросов из данных Excel
⚠️ Внимание: В Excel для Mac 2019 функция TEXTJOIN может некорректно работать с кириллическими разделителями. Используйте латиницу или обновляйтесь до последней версии.
Как эмулировать TEXTJOIN в Excel 2016?

Если у вас старая версия Excel, создайте пользовательскую функцию через VBA:

1. Нажмите Alt+F11, выберите Insert → Module

2. Вставьте код:

```vba

Function TEXTJOIN(delimiter As String, skip_empty As Boolean, rng As Range)

Dim result As String

Dim cell As Range

For Each cell In rng

If Not (skip_empty And IsEmpty(cell)) Then

If result <> "" Then result = result & delimiter

result = result & CStr(cell.Value)

End If

Next cell

TEXTJOIN = result

End Function

```

3. Сохраните и используйте в формулах как нативную функцию.

Способ 4: Power Query — объединение с предварительной обработкой

Если вам нужно не просто соединить текст, но и очистить данные (убрать пробелы, привести к единому регистру), Power Query станет идеальным инструментом. Это надстройка, доступная в Excel 2016+ и Office 365.

Пошаговая инструкция:

  1. Выделите исходные данные и нажмите Данные → Из таблицы/диапазона (или Get & Transform → From Table/Range)
  2. В открывшемся редакторе Power Query выберите столбцы для объединения (зажмите Ctrl)
  3. Нажмите Преобразовать → Объединить столбцы
  4. Укажите разделитель (например, пробел) и название нового столбца
  5. Нажмите Закрыть и загрузить, чтобы вернуть данные в Excel

Преимущества метода:

  • 🔹 Неразрушающее редактирование: исходные данные остаются нетронутыми
  • 🔹 Автоматическое обновление: при изменении исходников достаточно нажать "Обновить"
  • 🔹 Дополнительные преобразования: можно одновременно очищать данные от лишних символов

Способ 5: VBA-макрос для массового объединения

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

  • 🔹 Объединяет данные из двух столбцов в третий
  • 🔹 Добавляет разделитель по выбору
  • 🔹 Работает с выделенным диапазоном

Код макроса:

Sub CombineColumns()

Dim rng As Range, cell As Range


Dim delimiter As String


Dim col1 As Integer, col2 As Integer, outputCol As Integer



' Настройка: укажите номера столбцов (A=1, B=2...) и разделитель


col1 = 1    ' Первый столбец (A)


col2 = 2    ' Второй столбец (B)


outputCol = 3 ' Столбец для результата (C)


delimiter = " " ' Разделитель (пробел)



' Определяем диапазон данных


Set rng = Selection


If rng.Columns.Count <> 1 Then


MsgBox "Выделите ОДИН столбец с данными для обработки!", vbExclamation


Exit Sub


End If



' Объединяем данные


For Each cell In rng


Cells(cell.Row, outputCol).Value = _


Cells(cell.Row, col1).Value & delimiter & Cells(cell.Row, col2).Value


Next cell



MsgBox "Объединение завершено! Результаты в столбце " & Split(Cells(1, outputCol).Address, "$")(1), vbInformation


End Sub

Как использовать:

  1. Нажмите Alt+F11, вставьте код в новый модуль
  2. Вернитесь в Excel, выделите диапазон ячеек в любом столбце (макрос определит строки автоматически)
  3. Запустите макрос через Вид → Макросы → CombineColumns
⚠️ Внимание: Перед запуском макроса сохраните файл в формате .xlsm (с поддержкой макросов), иначе функционал будет заблокирован. В Excel Online макросы не работают.

Типичные ошибки и как их избежать

Даже опытные пользователи сталкиваются с проблемами при объединении текста. Вот TOP-5 ошибок и их решения:

Ошибка Пример Решение
Лишние пробелы в результате =A2&" "&B2 → "Иванов Петр" Используйте СЖПРОБЕЛЫ: =СЖПРОБЕЛЫ(A2)&" "&СЖПРОБЕЛЫ(B2)
Числа преобразуются в даты 1-12 становится 1-дек Принудительно конвертируйте в текст: =ТЕКСТ(A2;"0")&"-"&ТЕКСТ(B2;"0")
Формула не обновляется При изменении исходных данных результат статичен Проверьте формат ячеек (должен быть "Общий" или "Текстовый") и настройки вычислений (Формулы → Параметры вычислений → Автоматически)
Символы "#" в результате Иванов#Петр#35# Это признак ошибки в исходных данных. Проверьте ячейки на скрытые символы функцией ПЕЧСИМВ
Текст обрезается Результат: "Иванов Пет..." Увеличьте ширину столбца или проверьте ограничение на количество символов (32767 на ячейку)

Если вы работаете с большими объёмами данных (более 10 000 строк), избегайте вложенных формул типа СЦЕПИТЬ(СЦЕПИТЬ(A2;B2);C2) — они тормозят файл. Вместо этого:

  • 🔹 Используйте Power Query для предварительной обработки
  • 🔹 Разбейте задачу на этапы (создайте промежуточные столбцы)
  • 🔹 Применяйте VBA для массовых операций

FAQ: Ответы на частые вопросы

Можно ли объединить текст из двух файлов Excel?

Да, но не напрямую. Варианты:

  1. Power Query: импортируйте оба файла как источники данных, затем объедините столбцы в редакторе.
  2. VBA: напишите макрос, который открывает второй файл и копирует данные.
  3. Копирование: скопируйте данные из второго файла в первый, затем используйте любой метод из статьи.

Для регулярного объединения рекомендуем Power Query — он позволяет настроить автоматическое обновление при изменении исходных файлов.

Как объединить текст с сохранением форматирования (жирный, цвет)?

Стандартные функции Excel (СЦЕПИТЬ, TEXTJOIN) не сохраняют форматирование. Решения:

  • Ручной способ: скопируйте первую часть текста, вставьте в целевую ячейку, затем добавьте вторую часть с сохранением форматирования (Ctrl+Shift+V → Форматы).
  • VBA: используйте свойство .Characters для применения форматирования к частям текста: 
    Range("C1").Value = Range("A1").Value & " " & Range("B1").Value

    With Range("C1").Characters(Start:=1, Length:=Len(Range("A1").Value))
    

    .Font.Bold = True
    

    .Font.Color = RGB(255, 0, 0)
    

    End With

Почему после объединения числа отображаются как даты (например, 1-12 становится 1-дек)?

Это происходит потому, что Excel автоматически интерпретирует некоторые текстовые комбинации как даты. Чтобы избежать:

  • Добавьте апостроф перед числом: =A2 & "'-" & B2 (будет отображаться как текст).
  • Используйте функцию ТЕКСТ: =ТЕКСТ(A2;"0") & "-" & ТЕКСТ(B2;"0").
  • Поменяйте формат ячейки с результатом на "Текстовый" до ввода формулы.

Если данные уже преобразовались в даты, верните их обратно через ТЕКСТ или ФОРМУЛА.ТЕКСТ (в новых версиях).

Как объединить текст с переносом строки?

Используйте функцию СИМВОЛ(10) для вставки переноса строки:

=A2 & СИМВОЛ(10) & B2

Не забудьте включить перенос текста в ячейке:

  1. Выделите ячейку с формулой.
  2. Нажмите Ctrl+1 (или правая кнопка → Формат ячеек).
  3. Перейдите на вкладку Выравнивание и отметьте Переносить по словам.

Для Excel Online перенос строки работает иначе — используйте CHAR(10) и включите опцию "Wrap Text" на панели инструментов.

Можно ли отменить объединение и вернуть данные в исходные столбцы?

Если вы использовали формулы, просто удалите столбец с результатом — исходные данные остались нетронутыми. Если данные были объединены "навсегда" (например, через "Копировать → Специальная вставка → Значения"), воспользуйтесь одним из методов:

  • Текст по столбцам:
    1. Выделите столбец с объединёнными данными.
    2. Перейдите в Данные → Текст по столбцам.
    3. Выберите "С разделителями" и укажите символ-разделитель (пробел, запятая и т.д.).
  • Формулы: Если данные объединены через фиксированный разделитель (например, ";"), используйте: 
    =ЛЕВСИМВ(A2;НАЙТИ(";";A2)-1)  ' Первый элемент

    =ПСТР(A2;НАЙТИ(";";A2)+1;99)  ' Второй элемент

  • Power Query: Разделите столбец по разделителю в редакторе.

    • Для сложных случаев (например, разделитель нестабилен) придётся использовать VBA или регулярные выражения.

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

Как в Excel убрать лишние пробелы в числах и тексте Узнайте, как в Excel убрать лишние пробелы в числах. Эффективные методы: функции, макросы, Power Que Как в Excel перенести текст на новую строку: все способы Узнайте, как в Excel перенести текст на новую строку внутри ячейки. Горячие клавиши, автоперенос, фо Как в Excel разбить столбец на несколько: 5 проверенных способов Пошаговые инструкции по разделению данных в Excel: от текста по разделителю до формул и Power Query. Как в Excel оставить только текст: 7 способов очистки данных Узнайте, как удалить числа, формулы и символы в Excel, оставив только текстовые значения. Пошаговые Как вставить формулу только в видимые ячейки Excel Пошаговая инструкция: как скопировать формулу в отфильтрованные строки. Решение проблемы с заполнени Как в Excel разделить текст и цифры на разные ячейки — 5 способов Пошаговые инструкции с примерами: как быстро разделить смешанные данные в Excel на текст и числа. Фу