Как сделать жирный текст формулой в Excel: 3 проверенных метода

Формулой напрямую сделать текст жирным в Excel невозможно — стандартные функции вроде =ЖИРНЫЙ() не существуют. Но задача решается обходными путями: через условное форматирование, функцию CHAR(10) с ручным форматированием или VBA-макросы. Если вам нужно автоматически выделять жирным ячейки по условию (например, значения выше 100 или текст "Срочно"), читайте далее — разберём каждый метод с примерами для Excel 2010–2023 и Microsoft 365.

Важно понимать разницу: формула может только вернуть значение, но не изменить его оформление. Жирный шрифт — это свойство формата ячейки, а не её содержимого. Поэтому все решения ниже работают через связку "формула + инструмент форматирования". Начнём с самого надёжного способа — условного форматирования.

1. Условное форматирование: жирный текст по формуле

Это единственный способ сделать текст жирным автоматически без макросов. Алгоритм: создаём правило, которое проверяет условие (например, =A1>100) и применяет жирный шрифт к ячейке. Подходит для динамических данных, где значения меняются, а форматирование должно обновляться вместе с ними.

Пример: сделаем жирными все ячейки в столбце B, если соответствующие значения в столбце A больше 50. Шаги:

1. Выделите диапазон, который нужно отформатировать (например, B1:B100).
2. Перейдите на вкладку Главная → Условное форматирование → Создать правило.
3. Выберите тип правила: Использовать формулу для определения форматируемых ячеек.
4. В поле "Форматировать значения, для которых следующая формула является истинной" введите:

   =A1>50

   Примечание: в формуле всегда используется адрес первой ячейки выделенного диапазона (здесь A1, даже если выделили B1:B100).
5. Нажмите Формат, перейдите на вкладку Шрифт и выберите Жирный. Подтвердите нажатием ОК.

Теперь при изменении значений в столбце A ячейки в B будут автоматически становиться жирными, если условие выполняется. Этот метод работает во всех версиях Excel, включая онлайн-версию.

Ссылки в формуле относительные (без $)|Диапазон выделен правильно (не захватывает заголовки)|Формат применён к нужному стилю шрифта (не только жирный, но и цвет/размер при необходимости)|Правило не конфликтует с другими правилами условного форматирования-->

⚠️ Внимание: Если формула возвращает ошибку (например, #ЗНАЧ!), условное форматирование не сработает. Проверьте синтаксис и диапазоны ссылок. В Excel 365 можно использовать новые функции вроде ФИЛЬТР, но для форматирования они не подходят.

2. Функция CHAR(10) + ручное форматирование: обманный метод

Этот способ подходит, если нужно внутри одной ячейки сделать жирным только часть текста. Суть: разделяем текст символом переноса (CHAR(10)), а затем вручную форматируем отдельные строки. Минус — автоматического обновления не будет, но зато работает без макросов.

Пример: в ячейке A1 нужно отобразить текст "Итого: 1000", где "Итого:" — обычный шрифт, а "1000" — жирный. Делаем так:

1. В ячейке A1 введите формулу:

   ="Итого: "&ТЕКСТ(1000;"# ##0")&CHAR(10)&ТЕКСТ(1000;"# ##0")

   Пояснение: CHAR(10) добавляет перенос строки, а значение 1000 дублируется для демонстрации.
2. Нажмите Alt + Enter, чтобы активировать режим переноса строк в ячейке.
3. Дважды кликните по ячейке A1, чтобы перейти в режим редактирования.
4. Выделите мышью вторую строку (значение "1000") и нажмите Ctrl + B (или кнопку Ж на панели инструментов).

Результат: в ячейке будет две строки, где нижняя — жирная. Этот метод удобен для статических отчётов, где данные не меняются часто. Для динамических данных лучше использовать условное форматирование или VBA.

Условное форматирование|Функцию CHAR(10)|VBA-макросы|Не знаю, как это сделать-->

3. VBA-макросы: жирный текст по формуле с частичным форматированием

Если нужно автоматически выделять жирным часть текста внутри ячейки (например, только числа или ключевые слова), потребуется VBA. Этот метод самый гибкий, но работает только в настольных версиях Excel и требует включённых макросов.

Пример: сделаем жирными все числа в ячейках столбца A. Код макроса:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim cell As Range
Dim rng As Range
Set rng = Intersect(Target, Me.Range("A:A"))

If Not rng Is Nothing Then
Application.EnableEvents = False
For Each cell In rng
If IsNumeric(cell.Value) Then
cell.Font.Bold = True
Else
cell.Font.Bold = False
End If
Next cell
Application.EnableEvents = True
End If
End Sub

Как установить:

1. Нажмите Alt + F11, чтобы открыть редактор VBA.
2. В окне Project найдите вашу книгу и откройте модуль листа (двойной клик по имени листа, например, Лист1).
3. Вставьте код выше в открывшееся окно.
4. Сохраните файл как .xlsm (с поддержкой макросов).

Теперь при изменении любой ячейки в столбце A числа будут автоматически становиться жирными. Для частичного форматирования (например, жирные только слова "Важно") потребуется более сложный код с использованием объекта Characters.

⚠️ Внимание: Макросы могут конфликтовать с другими скриптами в книге. Перед использованием сохраните резервную копию файла. В Excel Online и мобильных версиях VBA не поддерживается.

4. Альтернативные решения: когда жирный текст не нужен

Иногда задачу можно решить без жирного шрифта, используя другие инструменты визуализации:

• 🔹 Цвет фона ячейки: Условное форматирование с заливкой (=A1>100 → красный фон) часто заметнее, чем жирный текст.
• 🔹 Границы ячеек: Добавление рамок через Главная → Границы выделяет данные без изменения шрифта.
• 🔹 Значки набора: В условном форматировании можно добавить стрелки или флажки (Управление правилами → Наборы значков).
• 🔹 Выделение цветом шрифта: Красный или зелёный текст привлекает внимание не хуже, чем жирный.

Эти методы часто проще в реализации и не требуют макросов. Например, для финансовых отчётов удобнее использовать цветовую маркировку: отрицательные значения — красным, положительные — зелёным.

5. Частые ошибки и как их избежать

При работе с жирным текстом через формулы пользователи допускают типичные ошибки:

• 🚫 Абсолютные ссылки в условном форматировании: Если в формуле указать =$A$1>50, правило будет проверять только ячейку A1, а не весь столбец. Используйте =A1>50.
• 🚫 Несоответствие диапазонов: Выделили B1:B100, а в формуле ссылаетесь на C1:C50 — правило не сработает.
• 🚫 Забыли включить перенос строк: При использовании CHAR(10) не нажали Alt + Enter, и текст отображается в одной строке.
• 🚫 Макросы отключены: Файл сохранён как .xlsx вместо .xlsm, и код VBA не выполняется.

Проверьте настройки безопасности макросов: Файл → Параметры → Центр управления безопасностью → Параметры центра... → Параметры макросов. Для работы скриптов выберите Включить все макросы (не рекомендуется для файлов из ненадёжных источников).

1. Нет ли в ячейках ошибок (#Н/Д, #ЗНАЧ!).

2. Не перекрывается ли правило другим (пriorитет правил настраивается в "Диспетчере правил").

3. Включён ли в настройках Excel показ форматирования (вкладка Вид → Показать → Условное форматирование).-->

6. Сравнение методов: какой выбрать

Выбор метода зависит от задачи:

• 📌 Для автоматического выделения целых ячеек: Условное форматирование — самый простой и универсальный способ.
• 📌 Для частичного форматирования внутри ячейки: VBA (если нужно автоматически) или CHAR(10) + ручное форматирование (для статических данных).
• 📌 Для онлайн-версии Excel: Только условное форматирование или CHAR(10).
• 📌 Для больших таблиц (10 000+ строк): Условное форматирование может тормозить — используйте VBA с оптимизированным кодом.

=И(A1>B1; НЕ(ЕПУСТО(C1)); ПОИСК("Да"; C1))

Sub BoldNumbersInSelection()
Dim cell As Range, i As Integer, ch As String
For Each cell In Selection
If IsNumeric(cell.Value) Then
cell.Font.Bold = True
Else
cell.Font.Bold = False
For i = 1 To Len(cell.Value)
ch = Mid(cell.Value, i, 1)
If IsNumeric(ch) Then
cell.Characters(i, 1).Font.Bold = True
End If
Next i
End If
Next cell
End Sub