Перейти к основному содержанию
 

Как удалить только текст из ячеек, содержащих числа и текст в Excel?

Автор: Силувия Последнее изменение: 2024 июля 10 г.

Как показано на скриншоте ниже, для этих ячеек, смешанных с числами и текстами, как удалить все тексты и оставить только числа в ячейках? Методы, описанные в этой статье, могут вам помочь.

Скриншот, показывающий ячейки Excel, содержащие смешанные числа и текст, а также результат с удаленным текстом

Удалить только текст из ячеек, содержащих числа и текст, с помощью пользовательской функции
Легко удаляйте только текст из ячеек, содержащих числа и текст, с помощью Kutools для Excel


Удалить только текст из ячеек, содержащих числа и текст, с помощью пользовательской функции

Вы также можете использовать указанную ниже функцию, определяемую пользователем, для удаления текста из указанных ячеек и сохранения только чисел.

1. нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.

2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули. Затем скопируйте и вставьте приведенный ниже код VBA в Code окно. Смотрите скриншот:

Код VBA: Удалить только текст из ячеек, содержащих числа и текст

Function OnlyNums(strWord As String)
    Dim strChar As String
    Dim x As Integer
    Dim strTemp As String

    strTemp = ""
    Application.ScreenUpdating = False
    For x = 1 To Len(strWord)
        strChar = Mid(strWord, x, 1)
        If Asc(strChar) >= 48 And _
          Asc(strChar) <= 57 Then
            strTemp = strTemp & strChar
        End If
    Next
    Application.ScreenUpdating = True
    OnlyNums = Val(strTemp)
End Function

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub

Скриншот, показывающий ввод кода VBA в Excel для удаления текста

3. нажмите другой + Q ключи, чтобы закрыть Microsoft Visual Basic для приложений окно.

4. Выберите пустую ячейку, введите формулу. = OnlyNums (A2) в панель формул, а затем нажмите Enter ключ для получения результата. Продолжая выбирать ячейку результата, перетащите ее маркер заполнения вниз, чтобы получить все результаты. Смотрите скриншот:

Скриншот, показывающий результаты после применения кода VBA для удаления текста в Excel

Внимание: В формуле. A2 - это ячейка, в которой вы удалите текст и сохраните только цифры. Пожалуйста, измените его по своему усмотрению.

Теперь вы можете видеть, что все тексты удалены, а в указанных ячейках хранятся только числа.


Легко удаляйте только текст из ячеек, содержащих числа и текст, с помощью Kutools для Excel

Этот раздел будет рекомендовать Удалить символы полезности Kutools for Excel. С помощью этой утилиты вы можете удалить все нечисловые символы из ячеек всего за несколько щелчков и оставить в ячейках только цифры. Пожалуйста, сделайте следующее.

Kutools for Excel предлагает более 300 расширенных функций для оптимизации сложных задач, повышения креативности и эффективности. Улучшено возможностями искусственного интеллектаKutools точно автоматизирует задачи, упрощая управление данными. Подробная информация о Kutools для Excel...         Бесплатная пробная версия...

1. Выберите ячейки, в которых нужно удалить текст и оставить только числа, затем нажмите Кутулс > Текст > Удалить символы

Скриншот функции Kutools Remove Characters в Excel

2. в Удалить символы диалоговое окно, только отметьте Нечисловой поле, а затем щелкните OK .

Скриншот диалогового окна Kutools Remove Characters

Все нечисловые символы немедленно удаляются из выбранных ячеек, как показано на снимке экрана ниже.

Скриншот, показывающий результаты в Excel после удаления нечисловых символов с помощью Kutools

Kutools for Excel - Усильте Excel более чем 300 необходимыми инструментами. Наслаждайтесь постоянно бесплатными функциями ИИ! Get It Now


Связанная статья:

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!