Как выделить жирным шрифтом часть текста при объединении двух столбцов в Excel?
Работая с данными в Excel, вы часто сталкиваетесь с необходимостью объединить информацию из двух столбцов в одну ячейку — чтобы улучшить читаемость или подготовить отчёт. Например, вы можете захотеть отобразить имена клиентов вместе с их местоположением или объединить названия товаров и их артикулы. Обычно это делают с помощью формул, таких как СЦЕПИТЬ или &. Однако здесь возникает распространённая проблема: после объединения Excel воспринимает результат как обычную текстовую строку и не поддерживает частичное форматирование по умолчанию. Это означает, что с помощью формул невозможно автоматически выделить жирным шрифтом только часть текста — любое форматирование применяется ко всей ячейке целиком. Такое ограничение особенно раздражает, когда нужно выделить лишь определённый фрагмент, например, сделать первое слово жирным. В этом руководстве мы покажем, как добиться частичного выделения жирным шрифтом при объединении двух столбцов в Excel, а также рассмотрим практические сценарии его применения и альтернативные решения.
Выделение жирным шрифтом части текста при объединении двух столбцов с помощью кода VBA
Альтернатива: объединение значений с помощью формул (с советами по форматированию)
Выделение жирным шрифтом части текста при объединении двух столбцов с помощью кода VBA
Представьте ситуацию, когда у вас есть два столбца: один содержит Имя, а другой — Фамилия. Вы хотите объединить их в новый столбец, но при этом выделить Имя (из первого столбца) жирным шрифтом, а Фамилия оставить обычным, как в профессиональных форматах отображения. На приведённом ниже снимке экрана показана эта цель: в объединённом результате первый фрагмент выделен жирным шрифтом:
Такой подход особенно полезен для списков, где нужно выделить ключевую информацию — например, имя или артикул товара — внутри более развёрнутого описания. Хотя стандартные формулы Excel не поддерживают частичное форматирование ячеек, вы можете автоматизировать объединение и форматирование с помощью макроса VBA. Это решение идеально подойдёт пользователям, знакомым с простыми макросами и стремящимся получить надёжный способ повторяемого частичного форматирования объединённых данных. Обратите внимание: для запуска VBA-кода необходимо включить макросы, а отменить его действия через Ctrl+Z невозможно — поэтому обязательно сохраните свою работу перед использованием.
1. Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений. Если вы впервые используете VBA, убедитесь, что на ленте Excel включена вкладка «Разработчик» (Файл > Параметры > Настройка ленты и панелей быстрого доступа > отметьте «Разработчик»).
2. В окне VBA выберите Вставка > Модуль, чтобы создать новый модуль. Затем вставьте приведённый ниже код в область кода модуля. Этот макрос объединит значения двух столбцов в каждой строке и автоматически выделит первое значение жирным шрифтом в результирующей ячейке:
Код VBA: выделение жирным шрифтом части текста при объединении двух столбцов:
Sub JoinCellsWithBoldFormatForFirstWord()
'Updateby Extendoffice 20160725
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
LInput:
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "does not support multiple selections", vbInformation, "Kutools for Excel"
GoTo LInput
End If
If xRg.Columns.Count <> 2 Then
MsgBox "only two columns in the selection", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Set xRg = xRg.Resize(xRg.Rows, 3)
On Error Resume Next
For Each xCell In xRg.Columns(3).Cells
xCell = xRg.Cells(xCell.Row, 1) & " " & xRg.Cells(xCell.Row, 2)
xCell.Font.Bold = False
xCell.Characters(1, Len(xRg.Cells(xCell.Row, 1))).Font.FontStyle = "Bold"
Next
End Sub
3. В меню нажмите F5, чтобы запустить макрос. Появится диалоговое окно, в котором можно выбрать диапазон ячеек для объединения и форматирования. Выделите нужный диапазон с помощью мыши или введите его вручную, например: A1:B10. Ниже показан экран выбора:
Советы перед запуском:
- Убедитесь, что выбранный диапазон охватывает оба столбца, которые вы хотите объединить.
- Этот макрос разместит результаты рядом с исходным выделением, поэтому убедитесь, что целевые ячейки пусты — это поможет избежать случайной перезаписи данных.
- Если в выбранном диапазоне есть объединённые ячейки или формулы, удалите их или очистите содержимое — это может вызвать ошибки.
Если вы случайно выбрали не тот диапазон, нажмите «Отмена» и запустите макрос заново.
4. Нажмите кнопку ОК в окне запроса. Макрос обработает данные и для каждой строки вашего выделенного диапазона объединит значения из обоих столбцов в новую ячейку справа. Первое значение в каждом результате будет автоматически выделено жирным шрифтом, как показано ниже:
Теперь вы можете использовать эти результаты для дальнейшего составления отчётов, печати или экспорта. Если результаты не оправдали ожиданий, дважды проверьте выделение и убедитесь, что в каждой строке оба исходных столбца содержат нужные значения.
Преимущества:
- Позволяет применять частичное форматирование (например, жирный шрифт или другие стилевые изменения) при объединении ячеек — чего невозможно достичь с помощью стандартных формул.
- Автоматизирует повторяющиеся задачи при работе с большими списками.
Недостатки: требует запуска макросов, которые могут быть заблокированы в некоторых средах.
Если возникли проблемы (отсутствие результата, ошибки или отсутствие форматирования):
- Проверьте параметры безопасности и убедитесь, что макросы включены (Файл > Параметры > Центр управления > Параметры Центра управления > Параметры макросов).
- Убедитесь, что в целевой области нет защищённых листов или объединённых ячеек.
- Если диапазон выбран неверно, запустите макрос ещё раз и выделите только два соседних столбца.
Альтернатива: объединение значений с помощью формул (с советами по форматированию)
Если вы не хотите использовать VBA, объединить значения из двух столбцов можно с помощью формул Excel — например, СЦЕПИТЬ, ОБЪЕДИНИТЬили просто амперсанда ()&). Правда, формулы не позволяют выделять часть результата жирным, но вы легко сможете объединить столбцы, а затем вручную отформатировать текст в каждой ячейке по своему усмотрению.
Чтобы объединить два столбца (A и B) в Excel:
1. Кликните по первой ячейке в целевом столбце (например, C2), затем введите эту формулу:
=A2 & " " & B22. Нажмите Enter, чтобы подтвердить и получить объединённый результат. Перетащите маркер заполнения вниз, чтобы применить формулу к другим строкам. Если вам нужно вручную выделить жирным шрифтом часть текста в результате формулы, сначала скопируйте ячейки с результатом и вставьте их как значения на то же место. Затем дважды щёлкните по ячейке, выделите нужный фрагмент и нажмите Ctrl + B или воспользуйтесь кнопкой «Жирный» на вкладке «Главная».
3. Если вы хотите использовать другие разделители или пользовательский формат, скорректируйте формулу по необходимости. Например, чтобы добавить запятую между текстами:
=A2 & ", " & B2Преимущества:
- Простой способ — без макросов и сложных настроек.
- Гибкость в объединении любого количества ячеек и поддержка пользовательских разделителей.
Недостатки:
- Частичное форматирование (например, жирный шрифт только для части текста) применяется вручную и не обновляется автоматически — при изменении значений его нужно настраивать заново.
- Не подходит для очень больших наборов данных при необходимости ручного форматирования.
Для наилучших результатов используйте этот метод при частичном форматировании небольших наборов данных или таблиц, готовых к презентации, — но только после окончательной обработки данных.
В заключение, VBA позволяет частично форматировать объединённые результаты в крупных или автоматизированных проектах, тогда как формулы идеально подходят для базового объединения и повседневных задач. Если вам нужны решения, основанные исключительно на формулах без учёта форматирования, воспользуйтесь стандартными методами объединения в Excel. Обязательно создавайте резервную копию книги перед запуском макросов и всегда дважды проверяйте выделение перед выполнением любых автоматизированных операций.
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек