Как оставить в ячейке Excel только цифры: от простых способов до автоматических решений

Работа с данными в Microsoft Excel часто требует очистки ячеек от лишних символов, чтобы оставшиеся цифровые значения можно было использовать в расчётах, построении графиков или аналитике. Типичная ситуация: вы скачали прайс-лист, где цены указаны с валютами («1 500 ₽»), телефонные номера содержат дефисы («8-912-345-67-89»), а артикулы товаров перемешаны с буквами («АРТ-12345К»). Вручную редактировать сотни строк — нерационально. К счастью, в Excel есть минимум 7 способов автоматически извлечь цифры из текста, и мы разберём каждый из них — от элементарных до продвинутых.

Эта статья поможет даже если вы никогда не работали с формулами: мы начнём с методов «для чайников» (например, Найти и заменить), а затем перейдём к универсальным решениям для сложных случаев — регулярным выражениям в Power Query или пользовательским функциям на VBA. Особое внимание уделим подводным камням: почему после очистки числа могут отображаться как текст, как сохранить ведущие нули и что делать, если цифры «спрятаны» в неразрывных пробелах.

———

1. Метод «Найти и заменить»: быстрая очистка для простых случаев

Если ваши данные содержат однотипные разделители (точки, запятые, тире, пробелы), самый простой способ — использовать стандартную функцию Найти и заменить (Ctrl + H). Этот метод подходит для телефонных номеров, цен с валютами или дат, где цифры чередуются с фиксированными символами.

Алгоритм действий:

1. Выделите диапазон ячеек с данными.
2. Нажмите Ctrl + H (или перейдите на вкладку Главная → Найти и выделить → Заменить).
3. В поле Найти введите символ, который нужно удалить (например, - для телефонов или ₽ для цен).
4. Оставьте поле Заменить на пустым.
5. Нажмите Заменить всё.

Повторите процесс для всех ненужных символов. Например, чтобы очистить номер телефона +7 (912) 345-67-89, потребуется 4 замены: удалить +7, (, ), - и пробелы.

⚠️ Внимание: Этот метод не подходит, если разделители нестандартные (например, неразрывные пробелы или символы юникода) или если цифры перемешаны с буквами в произвольном порядке. В таких случаях используйте формулы или Power Query.

———

2. Формулы для извлечения цифр: универсальные решения

Когда данные разнородные (например, А123Б45 или 10 кг (5 упаковок)), ручная замена неэффективна. Здесь помогут формулы массива или комбинации текстовых функций. Рассмотрим три варианта — от простого к сложному.

Способ 1. Формула с ПОДСТАВИТЬ и ЗНАЧЕН

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

=ЗНАЧЕН(ПОДСТАВИТЬ(A1; " "; ""))

Эта формула удаляет все пробелы из ячейки A1 и преобразует результат в число. Для других разделителей замените пробел в кавычках на нужный символ.

Способ 2. Формула массива для смешанных данных

Для извлечения цифр из строк типа АРТ-12345К или 10.5 кг подходит формула массива (вводится с Ctrl + Shift + Enter в старых версиях Excel):

=СУММПРОИЗВ(--(КОДСИМВ(ПОВТОР(A1;1))>=48); --(КОДСИМВ(ПОВТОР(A1;1))<=57); СТРОКА(ДВССЫЛ("1:100"))/100)

Она анализирует каждый символ в ячейке и возвращает только цифры (от 0 до 9 по таблице ASCII).

Способ 3. Пользовательская функция (для Excel 365)

В новых версиях Excel доступна функция ТЕКСТПОСЛЕ/ТЕКСТДО, но для извлечения цифр удобнее комбинировать ФИЛЬТР с РАЗБИТЬПОСИМВОЛАМ:

=СЦЕПИТЬ(ФИЛЬТР(РАЗБИТЬПОСИМВОЛАМ(A1;1;ИСТИНА); ЕЧИСЛО(ЗНАЧЕН(РАЗБИТЬПОСИМВОЛАМ(A1;1;ИСТИНА)))))

Sub ОставитьТолькоЦифры()
Dim rng As Range
Dim cell As Range
Dim i As Integer
Dim result As String

Set rng = Selection
For Each cell In rng
result = ""
For i = 1 To Len(cell.Value)
If IsNumeric(Mid(cell.Value, i, 1)) Then
result = result & Mid(cell.Value, i, 1)
End If
Next i
cell.Value = Val(result)
Next cell
End Sub

=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1; "("; ""); ")"; ""); "-"; ""); " "; ""); "+"; "")

=ЗНАЧЕН(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A1; "$"; ""); " "; ""))